home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / TUTOR151.ZIP / COMMANDS.MOD (.txt) next >
Encoding:
PCBoard Programming Language Executable  |  1995-06-14  |  58.5 KB  |  1,922 lines
  1. ;------------------------------------------------------------------------------
  2. ;                                                   .ss.
  3. ;                                                   `²²'
  4. ;             .,sS$Ss,,s$  .,sS$$$Ss.  .,sS$Ss,,s$ .ss.  .sSs.
  5. ;           .d$$²^°²$$$$'.d$P²°^^²$P'.d$$²^°²$$$$'.$$$' .$$$²Sb,.
  6. ;           $$$'   .$$$' $$$²Sçsµ²' .$$$'   .$$$'.$$$' .$$$'  `$$b.
  7. ;           $$$b,,d$$$' ,$$$b,....,s$$$$b,,d$$$'.$$$;.,$$$'    ;$$$
  8. ;           `²S$$S²²S$$S²°²S$$$$S²°°²S$$$$$$',$$S²°²S$S'.sS$$$P²'
  9. ;                                    .sS²°$$$²²°"'       d²°'
  10. ;                                  .$$²  .$$'
  11. ;                                  $$$.,d$$'
  12. ;                                  `²S$$S²'
  13. ;------------------------------------------------------------------------------
  14. ; P.P.L.X. 2.OO                          (C)1996 - Lone Runner / AEGiS CoRP'96 
  15. ;------------------------------------------------------------------------------
  16. ; PPE 3.1O (Encryption type I) - Analysis ON - Postprocessing ON
  17. ;------------------------------------------------------------------------------
  18.  
  19.     Integer  INTEGER001
  20.     String   STRING001
  21.     String   STRING002
  22.     String   STRING003
  23.     String   STRING004
  24.     String   STRING005
  25.     String   STRING006
  26.     String   STRING007
  27.     String   STRING008
  28.     String   STRING009
  29.     String   STRING010
  30.     String   STRING011
  31.     String   STRING012
  32.     String   STRING013
  33.     String   STRING014
  34.     String   STRING015
  35.     String   STRING016
  36.     String   STRING017
  37.     String   STRING018
  38.     String   STRING019
  39.     String   STRING020
  40.     String   STRING021
  41.     String   STRING022
  42.     String   STRING023
  43.     Declare  Function FUNCTION001() String
  44.     Declare  Function FUNCTION002() String
  45.     Declare  Function FUNCTION003() String
  46.     Declare  Function FUNCTION004() String
  47.     Declare  Function FUNCTION005() String
  48.  
  49. ;------------------------------------------------------------------------------
  50.  
  51.     STRING001 = ReadLine(PCBDat(), 94)
  52.     INTEGER001 = Len(STRING001) / 2
  53.     STRING002 = String(Asc(Mid(STRING001, INTEGER001, 3))) + String(Asc(Right(STRING001, 3))) + String(Asc(Mid(STRING001, 1, 3)))
  54.     FOpen 1, PPEPath() + "TUTOR.CFG", 0, 0
  55.     FGet 1, STRING003
  56.     FGet 1, STRING004
  57.     FGet 1, STRING007
  58.     FGet 1, STRING005
  59.     FGet 1, STRING006
  60.     FGet 1, STRING009
  61.     FGet 1, STRING010
  62.     FGet 1, STRING011
  63.     FGet 1, STRING012
  64.     FGet 1, STRING013
  65.     FGet 1, STRING014
  66.     FGet 1, STRING015
  67.     FGet 1, STRING016
  68.     FGet 1, STRING017
  69.     FGet 1, STRING018
  70.     FCloseAll
  71.     :LABEL001
  72.     AnsiPos 1, 4
  73.     PrintLn "@X70│ @X6F  @X60(@X6FC@X60)@X67ontinue @X6F @X78▄ @X70│@X01  @X17║@X3B@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  74.     AnsiPos 1, 5
  75.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07┌──────────────────────────────────────────────────┐@X37@X01░░@X17║@X07"
  76.     AnsiPos 1, 6
  77.     PrintLn "@X70│ @X10 @X13(@X1FM@X13)@X17ain Menu  @X78▄ @X70│@X01  @X17║@X01░░@X07│@X4F                 COMMAND PROMPTS                  @X07│@X01░░@X17║@X07"
  78.     AnsiPos 1, 7
  79.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  80.     AnsiPos 1, 8
  81.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E1@X0C] @X0AA@X0Fbandon Conference                @X07│@X01░░@X17║@X07"
  82.     AnsiPos 1, 9
  83.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E2@X0C] @X0AB@X0Fulletins                         @X07│@X01░░@X17║@X07"
  84.     AnsiPos 1, 10
  85.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E3@X0C] @X0AC@X0Fomment to SysOp                  @X07│@X01░░@X17║@X07"
  86.     AnsiPos 1, 11
  87.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E4@X0C] @X0AD@X0Fownload a file                   @X07│@X01░░@X17║@X07"
  88.     AnsiPos 1, 12
  89.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E5@X0C] @X0AE@X0Fnter a message                   @X07│@X01░░@X17║@X07"
  90.     AnsiPos 1, 13
  91.     PrintLn "@X70│                 │@X01  @X17║@X01░░@X07│            @X0C[@X0E6@X0C] @X0AF@X0File Directories                  @X07│@X01░░@X17║@X07"
  92.     AnsiPos 1, 14
  93.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E7@X0C] @X0AG@X0Foodbye (Logoff)                  @X07│@X01░░@X17║@X07"
  94.     AnsiPos 1, 15
  95.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E8@X0C] @X0F@X0AH@X0Felp                              @X07│@X01░░@X17║@X07"
  96.     AnsiPos 1, 16
  97.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E9@X0C] @X0F@X0AI@X0Fnitial Welcome                   @X07│@X01░░@X17║@X07"
  98.     AnsiPos 1, 17
  99.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  100.     AnsiPos 1, 18
  101.     PrintLn "@X70│                 @X70│@X0F  @X17║@X01░░@X07│   @X0BPress @X0F(@X0EC@X0F) @X0Bto continue and view more commands   @X07│@X01░░@X17║@X07"
  102.     AnsiPos 1, 19
  103.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07└──────────────────────────────────────────────────┘@X01░░@X17║@X07"
  104.     AnsiPos 1, 20
  105.     PrintLn "@X70│                 │@X01  @X17║@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  106.     AnsiPos 1, 21
  107.     PrintLn "@X70└──── Options ────┘@X01  @X17╚════════════════════════════════════════════════════════╝@X07"
  108.     AnsiPos 1, 22
  109.     PrintLn "                                                            "
  110.     AnsiPos 1, 22
  111.     STRING008 = " "
  112.     While (Upper(STRING008) <> "E") Do
  113.         STRING008 = FUNCTION001()
  114.         If (STRING008 == "END") Goto LABEL049
  115.         If (STRING008 == Chr(13)) Goto LABEL002
  116.         If (Upper(STRING008) == "1") Then
  117.             Goto LABEL037
  118.             Continue
  119.         Endif
  120.         If (Upper(STRING008) == "2") Then
  121.             Goto LABEL029
  122.             Continue
  123.         Endif
  124.         If (Upper(STRING008) == "3") Then
  125.             Goto LABEL020
  126.             Continue
  127.         Endif
  128.         If (Upper(STRING008) == "4") Then
  129.             Goto LABEL031
  130.             Continue
  131.         Endif
  132.         If (Upper(STRING008) == "5") Then
  133.             Goto LABEL040
  134.             Continue
  135.         Endif
  136.         If (Upper(STRING008) == "6") Then
  137.             Goto LABEL032
  138.             Continue
  139.         Endif
  140.         If (Upper(STRING008) == "7") Then
  141.             Goto LABEL021
  142.             Continue
  143.         Endif
  144.         If (Upper(STRING008) == "8") Then
  145.             Goto LABEL027
  146.             Continue
  147.         Endif
  148.         If (Upper(STRING008) == "9") Then
  149.             Goto LABEL039
  150.             Continue
  151.         Endif
  152.         If (Upper(STRING008) == "C") Then
  153.             Goto LABEL003
  154.             Continue
  155.         Endif
  156.         If (Upper(STRING008) == "M") Then
  157.             Goto LABEL049
  158.             Continue
  159.         Endif
  160.         If ((Upper(STRING008) == "E") || (Upper(STRING008) == "e")) Then
  161.             Goto LABEL049
  162.         Endif
  163.     EndWhile
  164.     End
  165.  
  166. ;------------------------------------------------------------------------------
  167.  
  168.     Function FUNCTION001() String
  169.  
  170.     While (FUNCTION001 == "") Do
  171.         FUNCTION001 = Inkey()
  172.     EndWhile
  173.  
  174.     EndFunc
  175.  
  176.     :LABEL002
  177.     Gosub LABEL048
  178.     Goto LABEL001
  179.     :LABEL003
  180.     AnsiPos 1, 4
  181.     PrintLn "@X70│ @X6F  @X60(@X6FC@X60)@X67ontinue @X6F @X78▄ @X70│@X01  @X17║@X3B@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  182.     AnsiPos 1, 5
  183.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07┌──────────────────────────────────────────────────┐@X37@X01░░@X17║@X07"
  184.     AnsiPos 1, 6
  185.     PrintLn "@X70│ @X10 @X13(@X1FM@X13)@X17ain Menu  @X78▄ @X70│@X01  @X17║@X01░░@X07│@X4F                 COMMAND PROMPTS                  @X07│@X01░░@X17║@X07"
  186.     AnsiPos 1, 7
  187.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  188.     AnsiPos 1, 8
  189.     PrintLn "@X70│ @X2F    @X28(@X2FB@X28)@X20ack    @X78▄ @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E1@X0C] @X0AJ@X0Foin a conference                 @X07│@X01░░@X17║@X07"
  190.     AnsiPos 1, 9
  191.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E2@X0C] @X0AK@X0Fill a message                    @X07│@X01░░@X17║@X07"
  192.     AnsiPos 1, 10
  193.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E3@X0C] @X0AL@X0Focate a file                     @X07│@X01░░@X17║@X07"
  194.     AnsiPos 1, 11
  195.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E4@X0C] @X0AM@X0Fode - Color On/Off               @X07│@X01░░@X17║@X07"
  196.     AnsiPos 1, 12
  197.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E5@X0C] @X0AN@X0Few file scan                     @X07│@X01░░@X17║@X07"
  198.     AnsiPos 1, 13
  199.     PrintLn "@X70│                 │@X01  @X17║@X01░░@X07│            @X0C[@X0E6@X0C] @X0AO@X0Fperator Page                     @X07│@X01░░@X17║@X07"
  200.     AnsiPos 1, 14
  201.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E7@X0C] @X0AP@X0Fage length set                   @X07│@X01░░@X17║@X07"
  202.     AnsiPos 1, 15
  203.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E8@X0C] @X0AQ@X0Fuick message scan                @X07│@X01░░@X17║@X07"
  204.     AnsiPos 1, 16
  205.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E9@X0C] @X0AR@X0Fead messages                     @X07│@X01░░@X17║@X07"
  206.     AnsiPos 1, 17
  207.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  208.     AnsiPos 1, 18
  209.     PrintLn "@X70│                 @X70│@X0F  @X17║@X01░░@X07│   @X0BPress @X0F(@X0EC@X0F) @X0Bto continue and view more commands   @X07│@X01░░@X17║@X07"
  210.     AnsiPos 1, 19
  211.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07└──────────────────────────────────────────────────┘@X01░░@X17║@X07"
  212.     AnsiPos 1, 20
  213.     PrintLn "@X70│                 │@X01  @X17║@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  214.     AnsiPos 1, 21
  215.     PrintLn "@X70└──── Options ────┘@X01  @X17╚════════════════════════════════════════════════════════╝@X07"
  216.     AnsiPos 1, 22
  217.     PrintLn "                                                            "
  218.     AnsiPos 1, 22
  219.     STRING008 = " "
  220.     While (Upper(STRING008) <> "E") Do
  221.         STRING008 = FUNCTION002()
  222.         If (STRING008 == "END") Goto LABEL049
  223.         If (STRING008 == Chr(13)) Goto LABEL004
  224.         If (Upper(STRING008) == "1") Then
  225.             Goto LABEL038
  226.             Continue
  227.         Endif
  228.         If (Upper(STRING008) == "2") Then
  229.             Goto LABEL041
  230.             Continue
  231.         Endif
  232.         If (Upper(STRING008) == "3") Then
  233.             Goto LABEL033
  234.             Continue
  235.         Endif
  236.         If (Upper(STRING008) == "4") Then
  237.             Goto LABEL022
  238.             Continue
  239.         Endif
  240.         If (Upper(STRING008) == "5") Then
  241.             Goto LABEL046
  242.             Continue
  243.         Endif
  244.         If (Upper(STRING008) == "6") Then
  245.             Goto LABEL030
  246.             Continue
  247.         Endif
  248.         If (Upper(STRING008) == "7") Then
  249.             Goto LABEL045
  250.             Continue
  251.         Endif
  252.         If (Upper(STRING008) == "8") Then
  253.             Goto LABEL042
  254.             Continue
  255.         Endif
  256.         If (Upper(STRING008) == "9") Then
  257.             Goto LABEL035
  258.             Continue
  259.         Endif
  260.         If (Upper(STRING008) == "C") Then
  261.             Goto LABEL005
  262.             Continue
  263.         Endif
  264.         If (Upper(STRING008) == "B") Then
  265.             Goto LABEL001
  266.             Continue
  267.         Endif
  268.         If (Upper(STRING008) == "M") Then
  269.             Goto LABEL049
  270.             Continue
  271.         Endif
  272.         If ((Upper(STRING008) == "E") || (Upper(STRING008) == "e")) Then
  273.             Goto LABEL049
  274.         Endif
  275.     EndWhile
  276.     End
  277.  
  278. ;------------------------------------------------------------------------------
  279.  
  280.     Function FUNCTION002() String
  281.  
  282.     While (FUNCTION002 == "") Do
  283.         FUNCTION002 = Inkey()
  284.     EndWhile
  285.  
  286.     EndFunc
  287.  
  288.     :LABEL004
  289.     Gosub LABEL048
  290.     Goto LABEL003
  291.     :LABEL005
  292.     Select Case (STRING009)
  293.         Case "YES"
  294.             Goto LABEL006
  295.         Case "NO"
  296.             Goto LABEL007
  297.     End Select
  298.     :LABEL006
  299.     AnsiPos 1, 4
  300.     PrintLn "@X70│ @X60  (@X6FC@X60)@X67ontinue  @X78▄ @X70│@X01  @X17║@X3B@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  301.     AnsiPos 1, 5
  302.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07┌──────────────────────────────────────────────────┐@X37@X01░░@X17║@X07"
  303.     AnsiPos 1, 6
  304.     PrintLn "@X70│ @X10 @X13@X13(@X1FM@X13)@X17ain Menu  @X78▄ @X70│@X01  @X17║@X01░░@X07│@X4F                 COMMAND PROMPTS                  @X07│@X01░░@X17║@X07"
  305.     AnsiPos 1, 7
  306.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  307.     AnsiPos 1, 8
  308.     PrintLn "@X70│ @X2F    @X28(@X2FB@X28)@X20ack    @X78▄ @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E1@X0C] @X0AT@X0Fransfer Protocol                 @X07│@X01░░@X17║@X07"
  309.     AnsiPos 1, 9
  310.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E2@X0C] @X0AV@X0Fiew your stats                   @X07│@X01░░@X17║@X07"
  311.     AnsiPos 1, 10
  312.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E3@X0C] @X0AW@X0Frite user information            @X07│@X01░░@X17║@X07"
  313.     AnsiPos 1, 11
  314.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E4@X0C] @X0AX@X0F-pert mode On/Off                @X07│@X01░░@X17║@X07"
  315.     AnsiPos 1, 12
  316.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E5@X0C] @X0AZ@X0Fippy text search                 @X07│@X01░░@X17║@X07"
  317.     AnsiPos 1, 13
  318.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E6@X0C] @X0AU@X0Fpload a file                     @X07│@X01░░@X17║@X07"
  319.     AnsiPos 1, 14
  320.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E7@X0C] @X0AWHO@X0F's online                      @X07│@X01░░@X17║@X07"
  321.     AnsiPos 1, 15
  322.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E8@X0C] @X0ANEWS                              @X07│@X01░░@X17║@X07"
  323.     AnsiPos 1, 16
  324.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E9@X0C] @X0AOPEN @X0Fa Door                       @X07│@X01░░@X17║@X07"
  325.     AnsiPos 1, 17
  326.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  327.     AnsiPos 1, 18
  328.     PrintLn "@X70│                 @X70│@X0F  @X17║@X01░░@X07│   @X0BPress @X0F(@X0EC@X0F) @X0Bto continue and view more commands   @X07│@X01░░@X17║@X07"
  329.     AnsiPos 1, 19
  330.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07└──────────────────────────────────────────────────┘@X01░░@X17║@X07"
  331.     AnsiPos 1, 20
  332.     PrintLn "@X70│                 │@X01  @X17║@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  333.     AnsiPos 1, 21
  334.     PrintLn "@X70└──── Options ────┘@X01  @X17╚════════════════════════════════════════════════════════╝@X07"
  335.     AnsiPos 1, 22
  336.     PrintLn "                                                            "
  337.     AnsiPos 1, 22
  338.     STRING008 = " "
  339.     While (Upper(STRING008) <> "E") Do
  340.         STRING008 = FUNCTION003()
  341.         If (STRING008 == "END") Goto LABEL049
  342.         If (STRING008 == Chr(13)) Goto LABEL008
  343.         If (Upper(STRING008) == "1") Then
  344.             Goto LABEL044
  345.             Continue
  346.         Endif
  347.         If (Upper(STRING008) == "2") Then
  348.             Goto LABEL024
  349.             Continue
  350.         Endif
  351.         If (Upper(STRING008) == "3") Then
  352.             Goto LABEL043
  353.             Continue
  354.         Endif
  355.         If (Upper(STRING008) == "4") Then
  356.             Goto LABEL028
  357.             Continue
  358.         Endif
  359.         If (Upper(STRING008) == "5") Then
  360.             Goto LABEL034
  361.             Continue
  362.         Endif
  363.         If (Upper(STRING008) == "6") Then
  364.             Goto LABEL036
  365.             Continue
  366.         Endif
  367.         If (Upper(STRING008) == "7") Then
  368.             Goto LABEL026
  369.             Continue
  370.         Endif
  371.         If (Upper(STRING008) == "8") Then
  372.             Goto LABEL025
  373.             Continue
  374.         Endif
  375.         If (Upper(STRING008) == "9") Then
  376.             Goto LABEL023
  377.             Continue
  378.         Endif
  379.         If (Upper(STRING008) == "B") Then
  380.             Goto LABEL003
  381.             Continue
  382.         Endif
  383.         If (Upper(STRING008) == "M") Then
  384.             Goto LABEL049
  385.             Continue
  386.         Endif
  387.         If (Upper(STRING008) == "C") Then
  388.             Goto LABEL009
  389.             Continue
  390.         Endif
  391.         If ((Upper(STRING008) == "E") || (Upper(STRING008) == "e")) Then
  392.             Goto LABEL049
  393.         Endif
  394.     EndWhile
  395.     End
  396.  
  397. ;------------------------------------------------------------------------------
  398.  
  399.     Function FUNCTION003() String
  400.  
  401.     While (FUNCTION003 == "") Do
  402.         FUNCTION003 = Inkey()
  403.     EndWhile
  404.  
  405.     EndFunc
  406.  
  407.     :LABEL007
  408.     AnsiPos 1, 4
  409.     PrintLn "@X70│                 @X70│@X01  @X17║@X3B@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  410.     AnsiPos 1, 5
  411.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07┌──────────────────────────────────────────────────┐@X37@X01░░@X17║@X07"
  412.     AnsiPos 1, 6
  413.     PrintLn "@X70│ @X10 @X13@X13(@X1FM@X13)@X17ain Menu  @X78▄ @X70│@X01  @X17║@X01░░@X07│@X4F                 COMMAND PROMPTS                  @X07│@X01░░@X17║@X07"
  414.     AnsiPos 1, 7
  415.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  416.     AnsiPos 1, 8
  417.     PrintLn "@X70│ @X2F    @X28(@X2FB@X28)@X20ack    @X78▄ @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E1@X0C] @X0AT@X0Fransfer Protocol                 @X07│@X01░░@X17║@X07"
  418.     AnsiPos 1, 9
  419.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E2@X0C] @X0AV@X0Fiew your stats                   @X07│@X01░░@X17║@X07"
  420.     AnsiPos 1, 10
  421.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E3@X0C] @X0AW@X0Frite user information            @X07│@X01░░@X17║@X07"
  422.     AnsiPos 1, 11
  423.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E4@X0C] @X0AX@X0F-pert mode On/Off                @X07│@X01░░@X17║@X07"
  424.     AnsiPos 1, 12
  425.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E5@X0C] @X0AZ@X0Fippy text search                 @X07│@X01░░@X17║@X07"
  426.     AnsiPos 1, 13
  427.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E6@X0C] @X0AU@X0Fpload a file                     @X07│@X01░░@X17║@X07"
  428.     AnsiPos 1, 14
  429.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E7@X0C] @X0AWHO@X0F's online                      @X07│@X01░░@X17║@X07"
  430.     AnsiPos 1, 15
  431.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E8@X0C] @X0ANEWS                              @X07│@X01░░@X17║@X07"
  432.     AnsiPos 1, 16
  433.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│            @X0C[@X0E9@X0C] @X0AOPEN @X0Fa Door                       @X07│@X01░░@X17║@X07"
  434.     AnsiPos 1, 17
  435.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  436.     AnsiPos 1, 18
  437.     PrintLn "@X70│                 @X70│@X0F  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  438.     AnsiPos 1, 19
  439.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07└──────────────────────────────────────────────────┘@X01░░@X17║@X07"
  440.     AnsiPos 1, 20
  441.     PrintLn "@X70│                 │@X01  @X17║@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  442.     AnsiPos 1, 21
  443.     PrintLn "@X70└──── Options ────┘@X01  @X17╚════════════════════════════════════════════════════════╝@X07"
  444.     AnsiPos 1, 22
  445.     PrintLn "                                                            "
  446.     AnsiPos 1, 22
  447.     STRING008 = " "
  448.     While (Upper(STRING008) <> "E") Do
  449.         STRING008 = FUNCTION004()
  450.         If (STRING008 == "END") Goto LABEL049
  451.         If (STRING008 == Chr(13)) Goto LABEL008
  452.         If (Upper(STRING008) == "1") Then
  453.             Goto LABEL044
  454.             Continue
  455.         Endif
  456.         If (Upper(STRING008) == "2") Then
  457.             Goto LABEL024
  458.             Continue
  459.         Endif
  460.         If (Upper(STRING008) == "3") Then
  461.             Goto LABEL043
  462.             Continue
  463.         Endif
  464.         If (Upper(STRING008) == "4") Then
  465.             Goto LABEL028
  466.             Continue
  467.         Endif
  468.         If (Upper(STRING008) == "5") Then
  469.             Goto LABEL034
  470.             Continue
  471.         Endif
  472.         If (Upper(STRING008) == "6") Then
  473.             Goto LABEL036
  474.             Continue
  475.         Endif
  476.         If (Upper(STRING008) == "7") Then
  477.             Goto LABEL026
  478.             Continue
  479.         Endif
  480.         If (Upper(STRING008) == "8") Then
  481.             Goto LABEL025
  482.             Continue
  483.         Endif
  484.         If (Upper(STRING008) == "9") Then
  485.             Goto LABEL023
  486.             Continue
  487.         Endif
  488.         If (Upper(STRING008) == "B") Then
  489.             Goto LABEL003
  490.             Continue
  491.         Endif
  492.         If (Upper(STRING008) == "M") Then
  493.             Goto LABEL049
  494.             Continue
  495.         Endif
  496.         If ((Upper(STRING008) == "E") || (Upper(STRING008) == "e")) Then
  497.             Goto LABEL049
  498.         Endif
  499.     EndWhile
  500.     End
  501.  
  502. ;------------------------------------------------------------------------------
  503.  
  504.     Function FUNCTION004() String
  505.  
  506.     While (FUNCTION004 == "") Do
  507.         FUNCTION004 = Inkey()
  508.     EndWhile
  509.  
  510.     EndFunc
  511.  
  512.     :LABEL008
  513.     Gosub LABEL048
  514.     Goto LABEL005
  515.     :LABEL009
  516.     AnsiPos 1, 4
  517.     PrintLn "@X70│                 @X70│@X01  @X17║@X3B@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  518.     AnsiPos 1, 5
  519.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07┌──────────────────────────────────────────────────┐@X37@X01░░@X17║@X07"
  520.     AnsiPos 1, 6
  521.     PrintLn "@X70│ @X10 @X13(@X1FM@X13)@X17ain Menu  @X78▄ @X70│@X01  @X17║@X01░░@X07│@X4F               CUSTOM COMMAND PROMPTS             @X07│@X01░░@X17║@X07"
  522.     AnsiPos 1, 7
  523.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  524.     AnsiPos 1, 8
  525.     PrintLn "@X70│ @X28    @X28(@X2FB@X28)@X20ack    @X78▄ @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  526.     AnsiPos 1, 9
  527.     PrintLn "@X70│  @X78▀▀▀▀▀▀▀▀▀▀▀▀▀▀ @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  528.     AnsiPos 1, 10
  529.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  530.     AnsiPos 1, 11
  531.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  532.     AnsiPos 1, 12
  533.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  534.     AnsiPos 1, 13
  535.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  536.     AnsiPos 1, 14
  537.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  538.     AnsiPos 1, 15
  539.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  540.     AnsiPos 1, 16
  541.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  @X07│@X01░░@X17║@X07"
  542.     AnsiPos 1, 17
  543.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  544.     AnsiPos 1, 18
  545.     PrintLn "@X70│                 @X70│@X0F  @X17║@X01░░@X07│                                                  │@X01░░@X17║@X07"
  546.     AnsiPos 1, 19
  547.     PrintLn "@X70│                 @X70│@X01  @X17║@X01░░@X07└──────────────────────────────────────────────────┘@X01░░@X17║@X07"
  548.     AnsiPos 1, 20
  549.     PrintLn "@X70│                 │@X01  @X17║@X01░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░@X17║@X07"
  550.     AnsiPos 1, 21
  551.     PrintLn "@X70└──── Options ────┘@X01  @X17╚════════════════════════════════════════════════════════╝@X07"
  552.     AnsiPos 1, 22
  553.     PrintLn "                                                            "
  554.     AnsiPos 1, 22
  555.     AnsiPos 38, 8
  556.     PrintLn "" + STRING010
  557.     AnsiPos 38, 9
  558.     PrintLn "" + STRING011
  559.     AnsiPos 38, 10
  560.     PrintLn "" + STRING012
  561.     AnsiPos 38, 11
  562.     PrintLn "" + STRING013
  563.     AnsiPos 38, 12
  564.     PrintLn "" + STRING014
  565.     AnsiPos 38, 13
  566.     PrintLn "" + STRING015
  567.     AnsiPos 38, 14
  568.     PrintLn "" + STRING016
  569.     AnsiPos 38, 15
  570.     PrintLn "" + STRING017
  571.     AnsiPos 38, 16
  572.     PrintLn "" + STRING018
  573.     STRING008 = " "
  574.     While (Upper(STRING008) <> "E") Do
  575.         STRING008 = FUNCTION005()
  576.         If (STRING008 == "END") Goto LABEL049
  577.         If (STRING008 == Chr(13)) Goto LABEL010
  578.         If (Upper(STRING008) == "1") Then
  579.             Goto LABEL011
  580.             Continue
  581.         Endif
  582.         If (Upper(STRING008) == "2") Then
  583.             Goto LABEL012
  584.             Continue
  585.         Endif
  586.         If (Upper(STRING008) == "3") Then
  587.             Goto LABEL013
  588.             Continue
  589.         Endif
  590.         If (Upper(STRING008) == "4") Then
  591.             Goto LABEL014
  592.             Continue
  593.         Endif
  594.         If (Upper(STRING008) == "5") Then
  595.             Goto LABEL015
  596.             Continue
  597.         Endif
  598.         If (Upper(STRING008) == "6") Then
  599.             Goto LABEL016
  600.             Continue
  601.         Endif
  602.         If (Upper(STRING008) == "7") Then
  603.             Goto LABEL017
  604.             Continue
  605.         Endif
  606.         If (Upper(STRING008) == "8") Then
  607.             Goto LABEL018
  608.             Continue
  609.         Endif
  610.         If (Upper(STRING008) == "9") Then
  611.             Goto LABEL019
  612.             Continue
  613.         Endif
  614.         If (Upper(STRING008) == "B") Then
  615.             Goto LABEL005
  616.             Continue
  617.         Endif
  618.         If (Upper(STRING008) == "M") Then
  619.             Goto LABEL049
  620.             Continue
  621.         Endif
  622.         If ((Upper(STRING008) == "E") || (Upper(STRING008) == "e")) Then
  623.             Goto LABEL049
  624.         Endif
  625.     EndWhile
  626.     End
  627.  
  628. ;------------------------------------------------------------------------------
  629.  
  630.     Function FUNCTION005() String
  631.  
  632.     While (FUNCTION005 == "") Do
  633.         FUNCTION005 = Inkey()
  634.     EndWhile
  635.  
  636.     EndFunc
  637.  
  638.     :LABEL010
  639.     Gosub LABEL048
  640.     Goto LABEL009
  641.     :LABEL011
  642.     DispFile PPEPath() + "CUSTOM1.TXT", 0
  643.     Wait
  644.     Goto LABEL009
  645.     :LABEL012
  646.     DispFile PPEPath() + "CUSTOM2.TXT", 0
  647.     Wait
  648.     Goto LABEL009
  649.     :LABEL013
  650.     DispFile PPEPath() + "CUSTOM3.TXT", 0
  651.     Wait
  652.     Goto LABEL009
  653.     :LABEL014
  654.     DispFile PPEPath() + "CUSTOM4.TXT", 0
  655.     Wait
  656.     Goto LABEL009
  657.     :LABEL015
  658.     DispFile PPEPath() + "CUSTOM5.TXT", 0
  659.     Wait
  660.     Goto LABEL009
  661.     :LABEL016
  662.     DispFile PPEPath() + "CUSTOM6.TXT", 0
  663.     Wait
  664.     Goto LABEL009
  665.     :LABEL017
  666.     DispFile PPEPath() + "CUSTOM7.TXT", 0
  667.     Wait
  668.     Goto LABEL009
  669.     :LABEL018
  670.     DispFile PPEPath() + "CUSTOM8.TXT", 0
  671.     Wait
  672.     Goto LABEL009
  673.     :LABEL019
  674.     DispFile PPEPath() + "CUSTOM9.TXT", 0
  675.     Wait
  676.     Goto LABEL009
  677.     :LABEL020
  678.     Gosub LABEL047
  679.     AnsiPos 1, 4
  680.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EC@X0C]@X0Eomment to the SysOp                      @X17 ║@X07"
  681.     AnsiPos 1, 5
  682.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  683.     AnsiPos 1, 6
  684.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  685.     AnsiPos 1, 7
  686.     PrintLn "@X17║ @X07│ @X0FThis command allows you to leave a private message (e-mail) to the      @X07│@X17 ║@X07"
  687.     AnsiPos 1, 8
  688.     PrintLn "@X17║ @X07│ @X0F@X0BSys@X0Ftem @X0BOp@X0Ferator.                                                        @X07@X07│@X17 ║@X07"
  689.     AnsiPos 1, 22
  690.     PrintLn "                                                            "
  691.     AnsiPos 1, 22
  692.     Wait
  693.     Goto LABEL001
  694.     :LABEL021
  695.     Gosub LABEL047
  696.     AnsiPos 1, 4
  697.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EG@X0C]@X0Eoodbye @X0C(@X0FHang-up@X0C) (@X0FLog-off@X0C)               @X17 ║@X07"
  698.     AnsiPos 1, 5
  699.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  700.     AnsiPos 1, 6
  701.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  702.     AnsiPos 1, 7
  703.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  704.     AnsiPos 1, 8
  705.     PrintLn "@X17║ @X07│ @X0FChoosing this command will disconnect you properly from the system.     @X07@X07│@X17 ║@X07"
  706.     AnsiPos 1, 22
  707.     PrintLn "                                                            "
  708.     AnsiPos 1, 22
  709.     Wait
  710.     Goto LABEL001
  711.     :LABEL022
  712.     Gosub LABEL047
  713.     AnsiPos 1, 4
  714.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EM@X0C]@X0Eode - @X0FC@X0Do@X0Bl@X0Ao@X09r @X0E(on/off)                     @X17 ║@X07"
  715.     AnsiPos 1, 5
  716.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  717.     AnsiPos 1, 6
  718.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  719.     AnsiPos 1, 7
  720.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  721.     AnsiPos 1, 8
  722.     PrintLn "@X17║ @X07│ @X0FChoose this option to switch between @X0Ec@X0Bo@X0Fl@X0Ao@X0Dr @X0Fand black and white screens. @X07@X07│@X17 ║@X07"
  723.     AnsiPos 1, 22
  724.     PrintLn "                                                            "
  725.     AnsiPos 1, 22
  726.     Wait
  727.     Goto LABEL003
  728.     :LABEL023
  729.     Gosub LABEL047
  730.     AnsiPos 1, 4
  731.     PrintLn "@X0F@X70└─  @X7F 50% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EOP@X0C]@X0Een a Door                               @X17 ║@X07"
  732.     AnsiPos 1, 5
  733.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  734.     AnsiPos 1, 6
  735.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  736.     AnsiPos 1, 7
  737.     PrintLn "@X17║ @X07│   @X60┌──────────────────@X67┐@X07  @X0FThis command allows you to @X0BOPEN @X0Fa door to       @X07│@X17 ║@X07"
  738.     AnsiPos 1, 8
  739.     PrintLn "@X17║ @X07│   @X60│     @X67┌──────@X60┐     @X67│@X07  @X0Fanother application.                            @X07@X07│@X17 ║@X07"
  740.     AnsiPos 1, 9
  741.     PrintLn "@X17║ @X07│   @X60│     @X67│      @X60│     @X67│@X07                                                  @X07│@X17 ║@X07"
  742.     AnsiPos 1, 10
  743.     PrintLn "@X17║ @X07│   @X60│     @X67└@X60──────┘     @X67│@X07  @X0FAll online games, QWK mail doors, and other     @X07│@X17 ║@X07"
  744.     AnsiPos 1, 11
  745.     PrintLn "@X17║ @X07│   @X60│                  @X67│@X07  @X0Fuseful programs will be located here.           @X07│@X17 ║@X07"
  746.     AnsiPos 1, 12
  747.     PrintLn "@X17║ @X07│   @X60│                  @X67│@X07  @X0F                                                @X07│@X17 ║@X07"
  748.     AnsiPos 1, 13
  749.     PrintLn "@X17║ @X07│   @X60│                  @X67│@X07                                                  @X07│@X17 ║@X07"
  750.     AnsiPos 1, 14
  751.     PrintLn "@X17║ @X07│   @X60│                @X6F° @X67│@X07                                                  @X07│@X17 ║@X07"
  752.     AnsiPos 1, 15
  753.     PrintLn "@X17║ @X07│   @X60│                  @X67│@X07                                                  @X07│@X17 ║@X07"
  754.     AnsiPos 1, 16
  755.     PrintLn "@X17║ @X07│   @X60│                  @X67│@X07                                                  @X07│@X17 ║@X07"
  756.     AnsiPos 1, 17
  757.     PrintLn "@X17║ @X07│   @X60│                  @X67│@X07                                                  @X07│@X17 ║@X07"
  758.     AnsiPos 1, 18
  759.     PrintLn "@X17║ @X07│   @X60│                  @X67│@X07                                                  @X07│@X17 ║@X07"
  760.     AnsiPos 1, 19
  761.     PrintLn "@X17║ @X07│   @X60└@X67──────────────────┘@X07                                                  @X07│@X17 ║@X07"
  762.     AnsiPos 1, 22
  763.     PrintLn "                                                            "
  764.     AnsiPos 1, 22
  765.     Wait
  766.     AnsiPos 1, 4
  767.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EOP@X0C]@X0Een a Door                               @X17 ║@X07"
  768.     AnsiPos 1, 5
  769.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  770.     AnsiPos 1, 6
  771.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  772.     AnsiPos 1, 7
  773.     PrintLn "@X17║ @X07│  @X0FYou can access the online doors a number of different ways.            @X07│@X17 ║@X07"
  774.     AnsiPos 1, 8
  775.     PrintLn "@X17║ @X07│  @X0E1@X0C) @X0FTo see a list of all the doors available just type @X0AOP @X0For @X0AOPEN @X0Fat    @X07@X07│@X17 ║@X07"
  776.     AnsiPos 1, 9
  777.     PrintLn "@X17║ @X07│     @X0Fthe menu prompt.                                                    @X07│@X17 ║@X07"
  778.     AnsiPos 1, 10
  779.     PrintLn "@X17║ @X07│  @X0E2@X0C) @X0FTo access a door directly from the menu without having to go the    @X07│@X17 ║@X07"
  780.     AnsiPos 1, 11
  781.     PrintLn "@X17║ @X07│     @X0Fdoors menu type, @X0AOP @X0For @X0AOPEN @X0Ffollowed by the @X0Adoor number@X0F.            @X07│@X17 ║@X07"
  782.     AnsiPos 1, 12
  783.     PrintLn "@X17║ @X07│  @X0E3@X0C) @X0FOr, you can access a door right from the menu prompt also, by       @X07│@X17 ║@X07"
  784.     AnsiPos 1, 13
  785.     PrintLn "@X17║ @X07│     @X0Ftyping the doors @X0Aname@X0F.                                              @X07│@X17 ║@X07"
  786.     AnsiPos 1, 14
  787.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  788.     AnsiPos 1, 15
  789.     PrintLn "@X17║ @X07│  @X0DFor example: @X0FIf an online game `Battle of the SySops` was number #14   @X07│@X17 ║@X07"
  790.     AnsiPos 1, 16
  791.     PrintLn "@X17║ @X07│  @X0Fon the doors menu and it had a keyword of `BOTS`, you would be able to @X07│@X17 ║@X07"
  792.     AnsiPos 1, 17
  793.     PrintLn "@X17║ @X07│  @X0Faccess the door right from the menu prompt by typing...                @X07│@X17 ║@X07"
  794.     AnsiPos 1, 18
  795.     PrintLn "@X17║ @X07│  @X0BOP @X0C<space> @X0B14  @X0For,  @X0BOPEN @X0C<space> @X0B14  @X0For,  @X0BBOTS                         @X07│@X17 ║@X07"
  796.     AnsiPos 1, 19
  797.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  798.     AnsiPos 1, 22
  799.     PrintLn "                                                            "
  800.     AnsiPos 1, 22
  801.     Wait
  802.     Goto LABEL005
  803.     :LABEL024
  804.     Gosub LABEL047
  805.     AnsiPos 1, 4
  806.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EV@X0C]@X0Eiew your Stats                           @X17 ║@X07"
  807.     AnsiPos 1, 5
  808.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  809.     AnsiPos 1, 6
  810.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  811.     AnsiPos 1, 7
  812.     PrintLn "@X17║ @X07│ @X0FThis command will show you your current system statistics. Such as the  @X07│@X17 ║@X07"
  813.     AnsiPos 1, 8
  814.     PrintLn "@X17║ @X07│ @X0Fnumber of downloads, uploads, message stats plus others.                @X07@X07│@X17 ║@X07"
  815.     AnsiPos 1, 9
  816.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  817.     AnsiPos 1, 10
  818.     PrintLn "@X17║ @X07│ @X0DFor example: @X0BHere are some of your system statistics...                 @X07│@X17 ║@X07"
  819.     AnsiPos 1, 11
  820.     PrintLn "@X17║ @X07│ @X70┌─────────────────────────────────────────────────────────────────────@X7F┐@X07 @X07│@X17 ║@X07"
  821.     AnsiPos 1, 12
  822.     PrintLn "@X17║ @X07│ @X70│ @X71User: @X7E@USER:50@            @X7F│@X07 @X07│@X17 ║@X07"
  823.     AnsiPos 1, 13
  824.     PrintLn "@X17║ @X07│ @X70│ @X74From: @X7F@CITY:40@ @X74Connected at: @X7F@CARRIER:6@ @X7F│@X07 @X07│@X17 ║@X07"
  825.     AnsiPos 1, 14
  826.     PrintLn "@X17║ @X07│ @X70│ @X74Number of Downloads: @X7F@DLFILES:5@       @X74Number of Uploads: @X7F@UPFILES:5@           @X7F│@X07 @X07│@X17 ║@X07"
  827.     AnsiPos 1, 15
  828.     PrintLn "@X17║ @X07│ @X70│ @X74No. of Messages Read: @X7F@MSGREAD:8@   @X74No. of messages written: @X7F@MSGLEFT:8@  @X7F│@X07 @X07│@X17 ║@X07"
  829.     AnsiPos 1, 16
  830.     PrintLn "@X17║ @X07│ @X70│ @X74Number of times you have logged on the system: @X7F@NUMTIMESON:6@               @X7F│@X07 @X07│@X17 ║@X07"
  831.     AnsiPos 1, 17
  832.     PrintLn "@X17║ @X07│ @X70│                                                                     @X7F│@X07 @X07│@X17 ║@X07"
  833.     AnsiPos 1, 18
  834.     PrintLn "@X17║ @X07│ @X70│ @X74Your current expiration date is set for: @X7E@EXPDATE:8@                   @X7F│@X07 @X07│@X17 ║@X07"
  835.     AnsiPos 1, 19
  836.     PrintLn "@X17║ @X07│ @X70└@X7F─────────────────────────────────────────────────────────────────────┘@X07 @X07│@X17 ║@X07"
  837.     AnsiPos 1, 22
  838.     PrintLn "                                                            "
  839.     AnsiPos 1, 22
  840.     Wait
  841.     Goto LABEL005
  842.     :LABEL025
  843.     Gosub LABEL047
  844.     AnsiPos 1, 4
  845.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0ENEWS@X0C]@X0E                                      @X17 ║@X07"
  846.     AnsiPos 1, 5
  847.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  848.     AnsiPos 1, 6
  849.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  850.     AnsiPos 1, 7
  851.     PrintLn "@X17║ @X07│ @X0FRe-displays the systems news.                                           @X07│@X17 ║@X07"
  852.     AnsiPos 1, 22
  853.     PrintLn "                                                            "
  854.     AnsiPos 1, 22
  855.     Wait
  856.     Goto LABEL005
  857.     :LABEL026
  858.     Gosub LABEL047
  859.     AnsiPos 1, 4
  860.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EWHO@X0C]@X0E's Onlline                             @X17 ║@X07"
  861.     AnsiPos 1, 5
  862.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  863.     AnsiPos 1, 6
  864.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  865.     AnsiPos 1, 7
  866.     PrintLn "@X17║ @X07│ @X0FThe @X0BWHO @X0Fcommand will show you a list of any activity on the other nodes @X07│@X17 ║@X07"
  867.     AnsiPos 1, 8
  868.     PrintLn "@X17║ @X07│ @X0F(phone lines).                                                          @X07@X07│@X17 ║@X07"
  869.     AnsiPos 1, 9
  870.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  871.     AnsiPos 1, 10
  872.     PrintLn "@X17║ @X07│ @X0DFor Example:                                                            @X07│@X17 ║@X07"
  873.     AnsiPos 1, 11
  874.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  875.     AnsiPos 1, 12
  876.     PrintLn "@X17║ @X07│ @X0A Node       Caller online                    Activity                   @X07│@X17 ║@X07"
  877.     AnsiPos 1, 13
  878.     PrintLn "@X17║ @X07│ @X0A ────       ─────────────────────────────    ─────────────────────────  @X07│@X17 ║@X07"
  879.     AnsiPos 1, 14
  880.     PrintLn "@X17║ @X07│   @NODE:3@       @USER:30@   Using the Tutorial         @X07│@X17 ║@X07"
  881.     AnsiPos 1, 15
  882.     PrintLn "@X17║ @X07│   2         SAMMY SMITH                      Available for Chat         @X07│@X17 ║@X07"
  883.     AnsiPos 1, 16
  884.     PrintLn "@X17║ @X07│   3         SYSTEM ACTIVITY                  Internet Mail Run          @X07│@X17 ║@X07"
  885.     AnsiPos 1, 22
  886.     PrintLn "                                                            "
  887.     AnsiPos 1, 22
  888.     Wait
  889.     Goto LABEL005
  890.     :LABEL027
  891.     Gosub LABEL047
  892.     AnsiPos 1, 4
  893.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EH@X0C]@X0Eelp                                      @X17 ║@X07"
  894.     AnsiPos 1, 5
  895.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  896.     AnsiPos 1, 6
  897.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  898.     AnsiPos 1, 7
  899.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  900.     AnsiPos 1, 8
  901.     PrintLn "@X17║ @X07│ @X0FUsing this command should bring you back to this tutorial :-)           @X07│@X17 ║@X07"
  902.     AnsiPos 1, 22
  903.     PrintLn "                                                            "
  904.     AnsiPos 1, 22
  905.     Wait
  906.     Goto LABEL001
  907.     :LABEL028
  908.     Gosub LABEL047
  909.     AnsiPos 1, 4
  910.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EX@X0C]@X0Epert Menus (on/off)                      @X17 ║@X07"
  911.     AnsiPos 1, 5
  912.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  913.     AnsiPos 1, 6
  914.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  915.     AnsiPos 1, 7
  916.     PrintLn "@X17║ @X07│ @X0FThe @X0BX-pert @X0Fmenus command will turn @X0Con @X0For @X0Coff @X0Fall the systems menus.     @X07│@X17 ║@X07"
  917.     AnsiPos 1, 8
  918.     PrintLn "@X17║ @X07│ @X0FWhen turned off no menus will be displayed and the only thing that will @X07@X07│@X17 ║@X07"
  919.     AnsiPos 1, 9
  920.     PrintLn "@X17║ @X07│ @X0Fappear is the command line prompt.                                      @X07│@X17 ║@X07"
  921.     AnsiPos 1, 10
  922.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  923.     AnsiPos 1, 11
  924.     PrintLn "@X17║ @X07│ @X0DExample:                                                                @X07│@X17 ║@X07"
  925.     AnsiPos 1, 12
  926.     PrintLn "@X17║ @X07│         @X0BMain Board command? @X87_                                           @X07│@X17 ║@X07"
  927.     AnsiPos 1, 13
  928.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  929.     AnsiPos 1, 14
  930.     PrintLn "@X17║ @X07│ @X0FTo turn x-pert mode off and view the menus just, choose the x-pert      @X07│@X17 ║@X07"
  931.     AnsiPos 1, 15
  932.     PrintLn "@X17║ @X07│ @X0Fcommand again.                                                          @X07│@X17 ║@X07"
  933.     AnsiPos 1, 22
  934.     PrintLn "                                                            "
  935.     AnsiPos 1, 22
  936.     Wait
  937.     Goto LABEL005
  938.     :LABEL029
  939.     Gosub LABEL047
  940.     AnsiPos 1, 4
  941.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EB@X0C]@X0Eulletins                                 @X17 ║@X07"
  942.     AnsiPos 1, 5
  943.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  944.     AnsiPos 1, 6
  945.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  946.     AnsiPos 1, 7
  947.     PrintLn "@X17║ @X07│ @X0FDisplays a list of Bulletins available for reading. These bulletins     @X07│@X17 ║@X07"
  948.     AnsiPos 1, 8
  949.     PrintLn "@X17║ @X07│ @X0Fcontain important information about should be read by everyone.         @X07@X07│@X17 ║@X07"
  950.     AnsiPos 1, 9
  951.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  952.     AnsiPos 1, 10
  953.     PrintLn "@X17║ @X07│ @X0DSubcommands:                                                            @X07│@X17 ║@X07"
  954.     AnsiPos 1, 11
  955.     PrintLn "@X17║ @X07│ @X0AB;#  @X0FThe bulletin number to view.                                       @X07│@X17 ║@X07"
  956.     AnsiPos 1, 12
  957.     PrintLn "@X17║ @X07│ @X0AB;A  @X0FDisplays ALL the bulletins.                                        @X07│@X17 ║@X07"
  958.     AnsiPos 1, 13
  959.     PrintLn "@X17║ @X07│ @X0AB;N  @X0FDisplays a bulletin only if its new.                               @X07│@X17 ║@X07"
  960.     AnsiPos 1, 14
  961.     PrintLn "@X17║ @X07│ @X0AB;S  @X0FScans the bulletins for text.                                      @X07│@X17 ║@X07"
  962.     AnsiPos 1, 22
  963.     PrintLn "                                                            "
  964.     AnsiPos 1, 22
  965.     Wait
  966.     Goto LABEL001
  967.     :LABEL030
  968.     Gosub LABEL047
  969.     AnsiPos 1, 4
  970.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EO@X0C]@X0Eperator Page                             @X17 ║@X07"
  971.     AnsiPos 1, 5
  972.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  973.     AnsiPos 1, 6
  974.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  975.     AnsiPos 1, 7
  976.     PrintLn "@X17║ @X07│ @X0FRequests a chat with the SysOp. If the SysOp is unavailable, then you   @X07│@X17 ║@X07"
  977.     AnsiPos 1, 8
  978.     PrintLn "@X17║ @X07│ @X0Fwill be asked if you wish to leave a comment. (a message)               @X07│@X17 ║@X07"
  979.     AnsiPos 1, 22
  980.     PrintLn "                                                            "
  981.     AnsiPos 1, 22
  982.     Wait
  983.     Goto LABEL003
  984.     :LABEL031
  985.     Gosub LABEL047
  986.     AnsiPos 1, 4
  987.     PrintLn "@X0F@X70└─  @X7F 25% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0ED@X0C]@X0Eownload a file                           @X17 ║@X07"
  988.     AnsiPos 1, 5
  989.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  990.     AnsiPos 1, 6
  991.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  992.     AnsiPos 1, 7
  993.     PrintLn "@X17║ @X07│ @X0FAllows you to transfer a file from this BBS system to your computer.    @X07│@X17 ║@X07"
  994.     AnsiPos 1, 8
  995.     PrintLn "@X17║ @X07│                                                                         @X07@X07│@X17 ║@X07"
  996.     AnsiPos 1, 9
  997.     PrintLn "@X17║ @X07│ @X0FTo download a file you first need to have specified a @X0BTransfer Protocol.@X07│@X17 ║@X07"
  998.     AnsiPos 1, 10
  999.     PrintLn "@X17║ @X07│ @X0FGenerally @X0BZMODEM @X0Fis the fastest, but you may use any Protocol that is   @X07│@X17 ║@X07"
  1000.     AnsiPos 1, 11
  1001.     PrintLn "@X17║ @X07│ @X0Fsupported by both the bbs and your communications program. Whichever    @X07│@X17 ║@X07"
  1002.     AnsiPos 1, 12
  1003.     PrintLn "@X17║ @X07│ @X0Fprotocol you choose to use you must make sure that you have that        @X07│@X17 ║@X07"
  1004.     AnsiPos 1, 13
  1005.     PrintLn "@X17║ @X07│ @X0Fprotocol specified in your communications program and on the bbs.       @X07│@X17 ║@X07"
  1006.     AnsiPos 1, 14
  1007.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1008.     AnsiPos 1, 15
  1009.     PrintLn "@X17║ @X07│ @X0FTo begin a file transfer (@X0Bdownload@X0F) type the @X0BD @X0Fcommand. PCBoard will    @X07│@X17 ║@X07"
  1010.     AnsiPos 1, 16
  1011.     PrintLn "@X17║ @X07│ @X0Frespond with the following prompt:                                      @X07│@X17 ║@X07"
  1012.     AnsiPos 1, 17
  1013.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1014.     AnsiPos 1, 18
  1015.     PrintLn "@X17║ @X07│ @X0E(1) Enter the Filename to Download (Enter)=none?                        @X07│@X17 ║@X07"
  1016.     AnsiPos 1, 19
  1017.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1018.     AnsiPos 1, 22
  1019.     PrintLn "                                                            "
  1020.     AnsiPos 1, 22
  1021.     Wait
  1022.     AnsiPos 1, 4
  1023.     PrintLn "@X0F@X70└─  @X7F 50% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0ED@X0C]@X0Eownload a file                           @X17 ║@X07"
  1024.     AnsiPos 1, 5
  1025.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1026.     AnsiPos 1, 6
  1027.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1028.     AnsiPos 1, 7
  1029.     PrintLn "@X17║ @X07│ @X0FEnter the name of the file you want to download. You can enter multiple @X07│@X17 ║@X07"
  1030.     AnsiPos 1, 8
  1031.     PrintLn "@X17║ @X07│ @X0Ffilenames on a single line but they MUST be seperated by a SPACE or a   @X07@X07│@X17 ║@X07"
  1032.     AnsiPos 1, 9
  1033.     PrintLn "@X17║ @X07│ @X0Fsemicolon (;). You can also use the DOS wildcard characters (* and ?)   @X07│@X17 ║@X07"
  1034.     AnsiPos 1, 10
  1035.     PrintLn "@X17║ @X07│ @X0F                                                                        @X07│@X17 ║@X07"
  1036.     AnsiPos 1, 11
  1037.     PrintLn "@X17║ @X07│ @X0FPress the @X0BENTER Key @X0Fafter you have typed in the filename. PCBoard will  @X07│@X17 ║@X07"
  1038.     AnsiPos 1, 12
  1039.     PrintLn "@X17║ @X07│ @X0Fthen display a second prompt:                                           @X07│@X17 ║@X07"
  1040.     AnsiPos 1, 13
  1041.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1042.     AnsiPos 1, 14
  1043.     PrintLn "@X17║ @X07│ @X0E(2) Enter the Filename to Download (Enter)=none?                        @X07│@X17 ║@X07"
  1044.     AnsiPos 1, 15
  1045.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1046.     AnsiPos 1, 16
  1047.     PrintLn "@X17║ @X07│ @X0FThis gives you the chance to enter another filename(s). If you have no  @X07│@X17 ║@X07"
  1048.     AnsiPos 1, 17
  1049.     PrintLn "@X17║ @X07│ @X0Fother files you want to download then just press the @X0BENTER Key@X0F. You     @X07│@X17 ║@X07"
  1050.     AnsiPos 1, 18
  1051.     PrintLn "@X17║ @X07│ @X0Fwill then be shown the following information:                           @X07│@X17 ║@X07"
  1052.     AnsiPos 1, 19
  1053.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1054.     AnsiPos 1, 22
  1055.     PrintLn "                                                            "
  1056.     AnsiPos 1, 22
  1057.     Wait
  1058.     AnsiPos 1, 4
  1059.     PrintLn "@X0F@X70└─  @X7F 75% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0ED@X0C]@X0Eownload a file                           @X17 ║@X07"
  1060.     AnsiPos 1, 5
  1061.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1062.     AnsiPos 1, 6
  1063.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1064.     AnsiPos 1, 7
  1065.     PrintLn "@X17║ @X07│ @X0EBatch Download time: @X0B<-- Approximate time necessary to download.        @X07│@X17 ║@X07"
  1066.     AnsiPos 1, 8
  1067.     PrintLn "@X17║ @X07│ @X0EBatch Download Size: @X0B<-- The Total Bytes of the selected files.         @X07@X07│@X17 ║@X07"
  1068.     AnsiPos 1, 9
  1069.     PrintLn "@X17║ @X07│ @X0EBatch Protocol Type: @X0B<-- Your current Transfer Protocol.                @X07│@X17 ║@X07"
  1070.     AnsiPos 1, 10
  1071.     PrintLn "@X17║ @X07│ @X0F@X0D(Ready to Send in Batch Mode) @X0B<-- Informs you the system is ready.      @X07│@X17 ║@X07"
  1072.     AnsiPos 1, 11
  1073.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1074.     AnsiPos 1, 12
  1075.     PrintLn "@X17║ @X07│ @X0A(A)bort, (E)dit, (G)oodbye, (L)ist, (P)rotocol, (Enter)=continue? ( )   @X07│@X17 ║@X07"
  1076.     AnsiPos 1, 13
  1077.     PrintLn "@X17║ @X07│ @X0FEnter your choice. @X0BA @X0Fwill abort the transfer, @X0BE @X0Fwill allow you to edit  @X07│@X17 ║@X07"
  1078.     AnsiPos 1, 14
  1079.     PrintLn "@X17║ @X07│ @X0Fthe download list, @X0BG @X0Fwill log you off the bbs when the system has       @X07│@X17 ║@X07"
  1080.     AnsiPos 1, 15
  1081.     PrintLn "@X17║ @X07│ @X0Ffinished the download, @X0BL @X0Fwill list the files you have selected, @X0BP @X0Fwill  @X07│@X17 ║@X07"
  1082.     AnsiPos 1, 16
  1083.     PrintLn "@X17║ @X07│ @X0Fallow you to change your transfer protocol and @X0BENTER @X0Fwill begin the     @X07│@X17 ║@X07"
  1084.     AnsiPos 1, 17
  1085.     PrintLn "@X17║ @X07│ @X0Ffile transfer. When you see the following prompt, you @X0CMUST @X0Fdo whatever  @X07│@X17 ║@X07"
  1086.     AnsiPos 1, 18
  1087.     PrintLn "@X17║ @X07│ @X0Fthe communication program you are using requires to start a download.   @X07│@X17 ║@X07"
  1088.     AnsiPos 1, 19
  1089.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1090.     AnsiPos 1, 22
  1091.     PrintLn "                                                            "
  1092.     AnsiPos 1, 22
  1093.     Wait
  1094.     AnsiPos 1, 4
  1095.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0ED@X0C]@X0Eownload a file                           @X17 ║@X07"
  1096.     AnsiPos 1, 5
  1097.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1098.     AnsiPos 1, 6
  1099.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1100.     AnsiPos 1, 7
  1101.     PrintLn "@X17║ @X07│ @X0ESending File(s) - Start your download...                                @X07│@X17 ║@X07"
  1102.     AnsiPos 1, 8
  1103.     PrintLn "@X17║ @X07│                                                                         @X07@X07│@X17 ║@X07"
  1104.     AnsiPos 1, 9
  1105.     PrintLn "@X17║ @X07│ @X0FIf you specify @X0BZMODEM @X0Fas your transfer protocol, the transfer will then @X07│@X17 ║@X07"
  1106.     AnsiPos 1, 10
  1107.     PrintLn "@X17║ @X07│ @X0Fbegin automatically with most communication programs if they are        @X07│@X17 ║@X07"
  1108.     AnsiPos 1, 11
  1109.     PrintLn "@X17║ @X07│ @X0Fconfigured properly. @X09(See your communication program's documentation)@X0F.  @X07│@X17 ║@X07"
  1110.     AnsiPos 1, 12
  1111.     PrintLn "@X17║ @X07│ @X0F                                                                        @X07│@X17 ║@X07"
  1112.     AnsiPos 1, 13
  1113.     PrintLn "@X17║ @X07│ @X0FYou may issue a more detailed download command at the Main Prompt       @X07│@X17 ║@X07"
  1114.     AnsiPos 1, 14
  1115.     PrintLn "@X17║ @X07│ @X0FCommand line. Below are a couple examples:                              @X07│@X17 ║@X07"
  1116.     AnsiPos 1, 15
  1117.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1118.     AnsiPos 1, 16
  1119.     PrintLn "@X17║ @X07│ @X0AD PKZ204G.EXE   @X0B- Will download the file PKZ204G.EXE                    @X07│@X17 ║@X07"
  1120.     AnsiPos 1, 17
  1121.     PrintLn "@X17║ @X07│ @X0F@X0AD ARJ241.ZIP Z  @X0B- Will download the file ARJ241.ZIP and use the ZMODEM  @X07│@X17 ║@X07"
  1122.     AnsiPos 1, 18
  1123.     PrintLn "@X17║ @X07│ @X0F                @X0B  transfer protocol.                                    @X07│@X17 ║@X07"
  1124.     AnsiPos 1, 19
  1125.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1126.     AnsiPos 1, 22
  1127.     PrintLn "                                                            "
  1128.     AnsiPos 1, 22
  1129.     Wait
  1130.     Goto LABEL001
  1131.     :LABEL032
  1132.     Gosub LABEL047
  1133.     AnsiPos 1, 4
  1134.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EF@X0C]@X0Eile Directories                          @X17 ║@X07"
  1135.     AnsiPos 1, 5
  1136.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1137.     AnsiPos 1, 6
  1138.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1139.     AnsiPos 1, 7
  1140.     PrintLn "@X17║ @X07│ @X0FDisplays a menu listing the file directories available.                 @X07│@X17 ║@X07"
  1141.     AnsiPos 1, 8
  1142.     PrintLn "@X17║ @X07│                                                                         @X07@X07│@X17 ║@X07"
  1143.     AnsiPos 1, 9
  1144.     PrintLn "@X17║ @X07│ @X0DShortcuts-Subcommands: @X0BEnter these commands from any main or conference @X07│@X17 ║@X07"
  1145.     AnsiPos 1, 10
  1146.     PrintLn "@X17║ @X07│                        @X0Bmenu.                                            @X07│@X17 ║@X07"
  1147.     AnsiPos 1, 11
  1148.     PrintLn "@X17║ @X07│ @X0AF;#  @X0FThe file directory to view.                                        @X07│@X17 ║@X07"
  1149.     AnsiPos 1, 12
  1150.     PrintLn "@X17║ @X07│ @X0AF;A  @X0FDisplay all the directories.                                       @X07│@X17 ║@X07"
  1151.     AnsiPos 1, 22
  1152.     PrintLn "                                                            "
  1153.     AnsiPos 1, 22
  1154.     Wait
  1155.     Goto LABEL001
  1156.     :LABEL033
  1157.     Gosub LABEL047
  1158.     AnsiPos 1, 4
  1159.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EL@X0C]@X0Eocate a file                             @X17 ║@X07"
  1160.     AnsiPos 1, 5
  1161.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1162.     AnsiPos 1, 6
  1163.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1164.     AnsiPos 1, 7
  1165.     PrintLn "@X17║ @X07│ @X0FAllows you to search the file directories for filenames which match     @X07│@X17 ║@X07"
  1166.     AnsiPos 1, 8
  1167.     PrintLn "@X17║ @X07│ @X0Fthose that you are looking for. You can also use valid DOS wildcards.   @X07@X07│@X17 ║@X07"
  1168.     AnsiPos 1, 9
  1169.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1170.     AnsiPos 1, 10
  1171.     PrintLn "@X17║ @X07│ @X0DFor example:                                                            @X07│@X17 ║@X07"
  1172.     AnsiPos 1, 11
  1173.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1174.     AnsiPos 1, 12
  1175.     PrintLn "@X17║ @X07│ @X0FEntering @X0AL;RS_23 @X0Fwill search all the file directories for filenames     @X07│@X17 ║@X07"
  1176.     AnsiPos 1, 13
  1177.     PrintLn "@X17║ @X07│ @X0Fthat begin with RS_23.                                                  @X07│@X17 ║@X07"
  1178.     AnsiPos 1, 22
  1179.     PrintLn "                                                            "
  1180.     AnsiPos 1, 22
  1181.     Wait
  1182.     Goto LABEL003
  1183.     :LABEL034
  1184.     Gosub LABEL047
  1185.     AnsiPos 1, 4
  1186.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EZ@X0C]@X0Eippy Text Search                         @X17 ║@X07"
  1187.     AnsiPos 1, 5
  1188.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1189.     AnsiPos 1, 6
  1190.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1191.     AnsiPos 1, 7
  1192.     PrintLn "@X17║ @X07│ @X0FThis command allows you to search selected file directories for words   @X07│@X17 ║@X07"
  1193.     AnsiPos 1, 8
  1194.     PrintLn "@X17║ @X07│ @X0For phrases either in the filename itself or in the description of the   @X07@X07│@X17 ║@X07"
  1195.     AnsiPos 1, 9
  1196.     PrintLn "@X17║ @X07│ @X0Ffiles.                                                                  @X07│@X17 ║@X07"
  1197.     AnsiPos 1, 10
  1198.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1199.     AnsiPos 1, 11
  1200.     PrintLn "@X17║ @X07│ @X0DSubcommands:                                                            @X07│@X17 ║@X07"
  1201.     AnsiPos 1, 12
  1202.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1203.     AnsiPos 1, 13
  1204.     PrintLn "@X17║ @X07│ @X0AZ;(text)  @X0FThe text you wish to search for                               @X07│@X17 ║@X07"
  1205.     AnsiPos 1, 22
  1206.     PrintLn "                                                            "
  1207.     AnsiPos 1, 22
  1208.     Wait
  1209.     Goto LABEL005
  1210.     :LABEL035
  1211.     AnsiPos 1, 4
  1212.     PrintLn "@X0F@X70└─  @X7F 50% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0ER@X0C]@X0Eead Messages                             @X17 ║@X07"
  1213.     AnsiPos 1, 5
  1214.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1215.     AnsiPos 1, 6
  1216.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1217.     AnsiPos 1, 7
  1218.     PrintLn "@X17║ @X07│ @X0FAllows reading messages left on the system. All public messages will be @X07│@X17 ║@X07"
  1219.     AnsiPos 1, 8
  1220.     PrintLn "@X17║ @X07│ @X0Fdisplayed, along with private messages left either by you or to you.    @X07@X07│@X17 ║@X07"
  1221.     AnsiPos 1, 9
  1222.     PrintLn "@X17║ @X07│ @X0F@X0BNote: Public Messages                                                   @X07│@X17 ║@X07"
  1223.     AnsiPos 1, 10
  1224.     PrintLn "@X17║ @X07│  These are messages that have been left for everyone to read.           @X07│@X17 ║@X07"
  1225.     AnsiPos 1, 11
  1226.     PrintLn "@X17║ @X07│ @X0BNote: Private Messages                                                  @X07│@X17 ║@X07"
  1227.     AnsiPos 1, 12
  1228.     PrintLn "@X17║ @X07│  These are messages that have been left for a particular user and can   @X07│@X17 ║@X07"
  1229.     AnsiPos 1, 13
  1230.     PrintLn "@X17║ @X07│  only be read by that user.                                             @X07│@X17 ║@X07"
  1231.     AnsiPos 1, 14
  1232.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1233.     AnsiPos 1, 15
  1234.     PrintLn "@X17║ @X07│  @X0DSub-Commands:                                                          @X07│@X17 ║@X07"
  1235.     AnsiPos 1, 16
  1236.     PrintLn "@X17║ @X07│  @X0AR;(#)   @X0F@X0CR@X0Fead any exisiting message number.                             @X07│@X17 ║@X07"
  1237.     AnsiPos 1, 17
  1238.     PrintLn "@X17║ @X07│  @X0AR;F     @X0F@X0CR@X0Fead messages left @X0CF@X0From you@X0F.                                   @X07│@X17 ║@X07"
  1239.     AnsiPos 1, 18
  1240.     PrintLn "@X17║ @X07│  @X0AR;Y     @X0F@X0CR@X0Fead messages left for @X0CY@X0Fou@X0F.                                    @X07│@X17 ║@X07"
  1241.     AnsiPos 1, 19
  1242.     PrintLn "@X17║ @X07│  @X0AR;A;Y;S @X0F@X0CR@X0Fead @X0CA@X0FLL @X0CY@X0Four messages @X0CS@X0Fince the last time you logged on.      @X07│@X17 ║@X07"
  1243.     AnsiPos 1, 20
  1244.     PrintLn "@X17║ @X07└─────────────────────────────────────────────────────────────────────────┘@X17 ║@X07"
  1245.     AnsiPos 1, 21
  1246.     PrintLn "@X17╚═════════════════════════════════════════════════════════════════════════════╝@X07"
  1247.     AnsiPos 1, 22
  1248.     PrintLn "                                                            "
  1249.     AnsiPos 1, 22
  1250.     Wait
  1251.     AnsiPos 1, 4
  1252.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0ER@X0C]@X0Eead Messages                             @X17 ║@X07"
  1253.     AnsiPos 1, 5
  1254.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1255.     AnsiPos 1, 6
  1256.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1257.     AnsiPos 1, 7
  1258.     PrintLn "@X17║ @X07│ @X0AR;1+     @X0F@X0CR@X0Fead all public messages from #@X0C1 @X0Fand continue forward.         @X07│@X17 ║@X07"
  1259.     AnsiPos 1, 8
  1260.     PrintLn "@X17║ @X07│ @X0AR;L      @X0F@X0CR@X0Fead all public messages from the @X0CL@X0Fast one continue backward.  @X07@X07│@X17 ║@X07"
  1261.     AnsiPos 1, 9
  1262.     PrintLn "@X17║ @X07│ @X0ARM       @X0F@X0CR@X0Fead previously @X0CM@X0Femorized message.                             @X07│@X17 ║@X07"
  1263.     AnsiPos 1, 10
  1264.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1265.     AnsiPos 1, 11
  1266.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1267.     AnsiPos 1, 12
  1268.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1269.     AnsiPos 1, 13
  1270.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1271.     AnsiPos 1, 14
  1272.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1273.     AnsiPos 1, 15
  1274.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1275.     AnsiPos 1, 16
  1276.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1277.     AnsiPos 1, 17
  1278.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1279.     AnsiPos 1, 18
  1280.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1281.     AnsiPos 1, 19
  1282.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1283.     AnsiPos 1, 20
  1284.     PrintLn "@X17║ @X07└─────────────────────────────────────────────────────────────────────────┘@X17 ║@X07"
  1285.     AnsiPos 1, 21
  1286.     PrintLn "@X17╚═════════════════════════════════════════════════════════════════════════════╝@X07"
  1287.     AnsiPos 1, 22
  1288.     PrintLn "                                                            "
  1289.     AnsiPos 1, 22
  1290.     Wait
  1291.     Goto LABEL003
  1292.     :LABEL036
  1293.     Gosub LABEL047
  1294.     AnsiPos 1, 4
  1295.     PrintLn "@X0F@X70└─  @X7F 25% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EU@X0C]@X0Epload a File                             @X17 ║@X07"
  1296.     AnsiPos 1, 5
  1297.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1298.     AnsiPos 1, 6
  1299.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1300.     AnsiPos 1, 7
  1301.     PrintLn "@X17║ @X07│ @X0FTransfers (sends) a file from your computer to this BBS system.         @X07│@X17 ║@X07"
  1302.     AnsiPos 1, 8
  1303.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1304.     AnsiPos 1, 9
  1305.     PrintLn "@X17║ @X07│ @X0FAs with downloading, be sure the Transfer Protocol you have specified   @X07│@X17 ║@X07"
  1306.     AnsiPos 1, 10
  1307.     PrintLn "@X17║ @X07│ @X0Fon the bbs is the same that is configured for your communications       @X07│@X17 ║@X07"
  1308.     AnsiPos 1, 11
  1309.     PrintLn "@X17║ @X07│ @X0Fprogram.  Begin the upload by typing the letter @X0BU@X0F. PCBoard will then    @X07│@X17 ║@X07"
  1310.     AnsiPos 1, 12
  1311.     PrintLn "@X17║ @X07│ @X0Fdisplay the following prompt:                                           @X07│@X17 ║@X07"
  1312.     AnsiPos 1, 13
  1313.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1314.     AnsiPos 1, 14
  1315.     PrintLn "@X17║ @X07│ @X0E(1) Enter the Filename to Upload (Enter)=none?                          @X07│@X17 ║@X07"
  1316.     AnsiPos 1, 15
  1317.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1318.     AnsiPos 1, 16
  1319.     PrintLn "@X17║ @X07│ @X0FType in the exact name of the file you are going to upload. If you just @X07│@X17 ║@X07"
  1320.     AnsiPos 1, 17
  1321.     PrintLn "@X17║ @X07│ @X0Fpress the @X0BENTER Key @X0Fhere the upload process will abort.                 @X07│@X17 ║@X07"
  1322.     AnsiPos 1, 18
  1323.     PrintLn "@X17║ @X07│ @X0FNext PCBoard will respond with the following:                           @X07│@X17 ║@X07"
  1324.     AnsiPos 1, 19
  1325.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1326.     AnsiPos 1, 22
  1327.     PrintLn "                                                            "
  1328.     AnsiPos 1, 22
  1329.     Wait
  1330.     AnsiPos 1, 4
  1331.     PrintLn "@X0F@X70└─  @X7F 50% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EU@X0C]@X0Epload a File                             @X17 ║@X07"
  1332.     AnsiPos 1, 5
  1333.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1334.     AnsiPos 1, 6
  1335.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1336.     AnsiPos 1, 7
  1337.     PrintLn "@X17║ @X07│ @X0EBefore beginning, enter a description of: filename                      @X07│@X17 ║@X07"
  1338.     AnsiPos 1, 8
  1339.     PrintLn "@X17║ @X07│ @X0ABegin description with (/) to make upload `Private'.                    @X07│@X17 ║@X07"
  1340.     AnsiPos 1, 9
  1341.     PrintLn "@X17║ @X07│ @X0AEnter your text. (Enter) alone to end. (45 chars/line, ##lines maximum) @X07│@X17 ║@X07"
  1342.     AnsiPos 1, 10
  1343.     PrintLn "@X17║ @X07│ @X0F? (                                              )                      @X07│@X17 ║@X07"
  1344.     AnsiPos 1, 11
  1345.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1346.     AnsiPos 1, 12
  1347.     PrintLn "@X17║ @X07│ @X0FYou should give a clear enough description of the file so that anyone   @X07│@X17 ║@X07"
  1348.     AnsiPos 1, 13
  1349.     PrintLn "@X17║ @X07│ @X0Fwho cares to download it will have a reasonable understanding of what   @X07│@X17 ║@X07"
  1350.     AnsiPos 1, 14
  1351.     PrintLn "@X17║ @X07│ @X0Fthe file does and is.  Press the @X0BENTER Key @X0Fon a blank line when you     @X07│@X17 ║@X07"
  1352.     AnsiPos 1, 15
  1353.     PrintLn "@X17║ @X07│ @X0Fhave finished your description. You will then see the next prompt:      @X07│@X17 ║@X07"
  1354.     AnsiPos 1, 16
  1355.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1356.     AnsiPos 1, 17
  1357.     PrintLn "@X17║ @X07│ @X0E(2) Enter the Filename to Upload (Enter)=none?                          @X07│@X17 ║@X07"
  1358.     AnsiPos 1, 18
  1359.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1360.     AnsiPos 1, 19
  1361.     PrintLn "@X17║ @X07│ @X0FIf you are uploading a single file then just press the @X0BENTER Key@X0F.       @X07│@X17 ║@X07"
  1362.     AnsiPos 1, 22
  1363.     PrintLn "                                                            "
  1364.     AnsiPos 1, 22
  1365.     Wait
  1366.     AnsiPos 1, 4
  1367.     PrintLn "@X0F@X70└─  @X7F 75% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EU@X0C]@X0Epload a File                             @X17 ║@X07"
  1368.     AnsiPos 1, 5
  1369.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1370.     AnsiPos 1, 6
  1371.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1372.     AnsiPos 1, 7
  1373.     PrintLn "@X17║ @X07│ @X0FHaving done that PCBoard will respond with the following prompt:        @X07│@X17 ║@X07"
  1374.     AnsiPos 1, 8
  1375.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1376.     AnsiPos 1, 9
  1377.     PrintLn "@X17║ @X07│ @X0A(G)oodbye after Batch, (A)bort, Change (P)rotocol, Enter=continue? ( )  @X07│@X17 ║@X07"
  1378.     AnsiPos 1, 10
  1379.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1380.     AnsiPos 1, 11
  1381.     PrintLn "@X17║ @X07│ @X0FType @X0BG @X0Fif you want to be disconnect from the BBS after uploading your   @X07│@X17 ║@X07"
  1382.     AnsiPos 1, 12
  1383.     PrintLn "@X17║ @X07│ @X0Ffile(s), @X0BA @X0Fif you want to abort (stop) the transfer, @X0BP @X0Fif you want to   @X07│@X17 ║@X07"
  1384.     AnsiPos 1, 13
  1385.     PrintLn "@X17║ @X07│ @X0Fchange your transfer protocol or @X0BENTER @X0Fto begin the transfer. When the  @X07│@X17 ║@X07"
  1386.     AnsiPos 1, 14
  1387.     PrintLn "@X17║ @X07│ @X0Fsystem displays the next few lines it is ready to receive your upload.  @X07│@X17 ║@X07"
  1388.     AnsiPos 1, 15
  1389.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1390.     AnsiPos 1, 16
  1391.     PrintLn "@X17║ @X07│ @X0EUpload Drive :  @X0B<-- Disk space available on the BBS for uploads.        @X07│@X17 ║@X07"
  1392.     AnsiPos 1, 17
  1393.     PrintLn "@X17║ @X07│ @X0EUpload Status:  @X0B<-- Whether or not the file is posted immediatedly.     @X07│@X17 ║@X07"
  1394.     AnsiPos 1, 18
  1395.     PrintLn "@X17║ @X07│ @X0EProtocol Type:  @X0B<-- Your current selected Transfer Protocol.            @X07│@X17 ║@X07"
  1396.     AnsiPos 1, 19
  1397.     PrintLn "@X17║ @X07│ @X0D(Ctrl-X) Aborts Transfer                                                @X07│@X17 ║@X07"
  1398.     AnsiPos 1, 22
  1399.     PrintLn "                                                            "
  1400.     AnsiPos 1, 22
  1401.     Wait
  1402.     AnsiPos 1, 4
  1403.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EU@X0C]@X0Epload a File                             @X17 ║@X07"
  1404.     AnsiPos 1, 5
  1405.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1406.     AnsiPos 1, 6
  1407.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1408.     AnsiPos 1, 7
  1409.     PrintLn "@X17║ @X07│ @X0FUnless you told the system to disconnect you when the transfer has      @X07│@X17 ║@X07"
  1410.     AnsiPos 1, 8
  1411.     PrintLn "@X17║ @X07│ @X0Ffinished, you will be returned to the board. Most systems @X0C(@X0Aif not ALL@X0C)  @X07│@X17 ║@X07"
  1412.     AnsiPos 1, 9
  1413.     PrintLn "@X17║ @X07│ @X0Fsystems will check the integrity of the  file(s) for errors, viruses    @X07│@X17 ║@X07"
  1414.     AnsiPos 1, 10
  1415.     PrintLn "@X17║ @X07│ @X0Fand usually an age of the files before posting the file in the Public   @X07│@X17 ║@X07"
  1416.     AnsiPos 1, 11
  1417.     PrintLn "@X17║ @X07│ @X0FUpload area.                                                            @X07│@X17 ║@X07"
  1418.     AnsiPos 1, 12
  1419.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1420.     AnsiPos 1, 13
  1421.     PrintLn "@X17║ @X07│ @X0FLike downloads, you can enter (stack) several commands on the Command   @X07│@X17 ║@X07"
  1422.     AnsiPos 1, 14
  1423.     PrintLn "@X17║ @X07│ @X0FLine. Below are a couple examples:                                      @X07│@X17 ║@X07"
  1424.     AnsiPos 1, 15
  1425.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1426.     AnsiPos 1, 16
  1427.     PrintLn "@X17║ @X07│ @X0EU MAGIC1.ZIP Z     @X0B- Will upload MAGIC1.ZIP using ZMODEM.               @X07│@X17 ║@X07"
  1428.     AnsiPos 1, 17
  1429.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1430.     AnsiPos 1, 18
  1431.     PrintLn "@X17║ @X07│ @X0EU MAGIC1.ZIP Z BYE @X0B- Will upload MAGIC1.ZIP using ZMODEM and then       @X07│@X17 ║@X07"
  1432.     AnsiPos 1, 19
  1433.     PrintLn "@X17║ @X07│                    @X0B  disconnect you when finished.                      @X07│@X17 ║@X07"
  1434.     AnsiPos 1, 22
  1435.     PrintLn "                                                            "
  1436.     AnsiPos 1, 22
  1437.     Wait
  1438.     Goto LABEL005
  1439.     :LABEL037
  1440.     Gosub LABEL047
  1441.     AnsiPos 1, 4
  1442.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EA@X0C]@X0Ebandon conference                        @X17 ║@X07"
  1443.     AnsiPos 1, 5
  1444.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1445.     AnsiPos 1, 6
  1446.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1447.     AnsiPos 1, 7
  1448.     PrintLn "@X17║ @X07│ @X0FAbandons the current conference and places you back in the main board   @X07│@X17 ║@X07"
  1449.     AnsiPos 1, 8
  1450.     PrintLn "@X17║ @X07│ @X0Fsection of the system.                                                  @X07@X07│@X17 ║@X07"
  1451.     AnsiPos 1, 22
  1452.     PrintLn "                                                            "
  1453.     AnsiPos 1, 22
  1454.     Wait
  1455.     Goto LABEL001
  1456.     :LABEL038
  1457.     Gosub LABEL047
  1458.     AnsiPos 1, 4
  1459.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EJ@X0C]@X0Eoin a conference                         @X17 ║@X07"
  1460.     AnsiPos 1, 5
  1461.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1462.     AnsiPos 1, 6
  1463.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1464.     AnsiPos 1, 7
  1465.     PrintLn "@X17║ @X07│ @X0FAllows joining an active conference on the system.                      @X07│@X17 ║@X07"
  1466.     AnsiPos 1, 8
  1467.     PrintLn "@X17║ @X07│ @X0F                                                                        @X07@X07│@X17 ║@X07"
  1468.     AnsiPos 1, 9
  1469.     PrintLn "@X17║ @X07│ @X0DSubCommands:                                                            @X07│@X17 ║@X07"
  1470.     AnsiPos 1, 10
  1471.     PrintLn "@X17║ @X07│ @X0AJ;(#)   @X0FEnter the @X0CJ; @X0Fcommand followed by a valid conference number from @X07│@X17 ║@X07"
  1472.     AnsiPos 1, 11
  1473.     PrintLn "@X17║ @X07│         @X0F@X0C0 @X0Fto the highest conference number on this system.              @X07│@X17 ║@X07"
  1474.     AnsiPos 1, 22
  1475.     PrintLn "                                                            "
  1476.     AnsiPos 1, 22
  1477.     Wait
  1478.     Goto LABEL003
  1479.     :LABEL039
  1480.     Gosub LABEL047
  1481.     AnsiPos 1, 4
  1482.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EI@X0C]@X0Enitial Welcome                           @X17 ║@X07"
  1483.     AnsiPos 1, 5
  1484.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1485.     AnsiPos 1, 6
  1486.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1487.     AnsiPos 1, 7
  1488.     PrintLn "@X17║ @X07│ @X0FRe-displays the initial login @X0B(welcome) @X0Fscreen.                         @X07│@X17 ║@X07"
  1489.     AnsiPos 1, 22
  1490.     PrintLn "                                                            "
  1491.     AnsiPos 1, 22
  1492.     Wait
  1493.     Goto LABEL001
  1494.     :LABEL040
  1495.     Gosub LABEL047
  1496.     AnsiPos 1, 4
  1497.     PrintLn "@X0F@X70└─  @X7F 25% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EE@X0C]@X0Enter a Message                           @X17 ║@X07"
  1498.     AnsiPos 1, 5
  1499.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1500.     AnsiPos 1, 6
  1501.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1502.     AnsiPos 1, 7
  1503.     PrintLn "@X17║ @X07│ @X0FAllows you to leave a message to another person for them to read at a   @X07│@X17 ║@X07"
  1504.     AnsiPos 1, 8
  1505.     PrintLn "@X17║ @X07│ @X0Flater date.                                                             @X07@X07│@X17 ║@X07"
  1506.     AnsiPos 1, 9
  1507.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1508.     AnsiPos 1, 10
  1509.     PrintLn "@X17║ @X07│ @X0FYou will have the opportunity to leave a public message to @X0CALL @X0Fof the   @X07│@X17 ║@X07"
  1510.     AnsiPos 1, 11
  1511.     PrintLn "@X17║ @X07│ @X0Fmembers of the board or a private message to a particular member.       @X07│@X17 ║@X07"
  1512.     AnsiPos 1, 12
  1513.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1514.     AnsiPos 1, 13
  1515.     PrintLn "@X17║ @X07│ @X0FTo address a message to @X0CALL @X0Fsimply press the @X0BENTER Key @X0Fat this prompt:  @X07│@X17 ║@X07"
  1516.     AnsiPos 1, 14
  1517.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1518.     AnsiPos 1, 15
  1519.     PrintLn "@X17║ @X07│ @X0ETo (Enter) = `ALL'?                                                     @X07│@X17 ║@X07"
  1520.     AnsiPos 1, 16
  1521.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1522.     AnsiPos 1, 17
  1523.     PrintLn "@X17║ @X07│ @X0FIf the message is to a particular person then enter the user's name     @X07│@X17 ║@X07"
  1524.     AnsiPos 1, 18
  1525.     PrintLn "@X17║ @X07│ @X0Fhere. Then type in the subject of the message at the next prompt:       @X07│@X17 ║@X07"
  1526.     AnsiPos 1, 19
  1527.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1528.     AnsiPos 1, 22
  1529.     PrintLn "                                                            "
  1530.     AnsiPos 1, 22
  1531.     Wait
  1532.     AnsiPos 1, 4
  1533.     PrintLn "@X0F@X70└─  @X7F 50% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EE@X0C]@X0Enter a Message                           @X17 ║@X07"
  1534.     AnsiPos 1, 5
  1535.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1536.     AnsiPos 1, 6
  1537.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1538.     AnsiPos 1, 7
  1539.     PrintLn "@X17║ @X07│ @X0ESubject (Enter)=abort (                                              )  @X07│@X17 ║@X07"
  1540.     AnsiPos 1, 8
  1541.     PrintLn "@X17║ @X07│                                                                         @X07@X07│@X17 ║@X07"
  1542.     AnsiPos 1, 9
  1543.     PrintLn "@X17║ @X07│ @X0FThe next prompt will ask you to enter the message's security:           @X07│@X17 ║@X07"
  1544.     AnsiPos 1, 10
  1545.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1546.     AnsiPos 1, 11
  1547.     PrintLn "@X17║ @X07│ @X0CMessage Security (N)=help? (@X0FN@X0C)                                          @X07│@X17 ║@X07"
  1548.     AnsiPos 1, 12
  1549.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1550.     AnsiPos 1, 13
  1551.     PrintLn "@X17║ @X07│ @X0FIf the message is public and intended for all members, just press the   @X07│@X17 ║@X07"
  1552.     AnsiPos 1, 14
  1553.     PrintLn "@X17║ @X07│ @X0BENTER Key @X0Fat this prompt. If it is to be a private message then type in @X07│@X17 ║@X07"
  1554.     AnsiPos 1, 15
  1555.     PrintLn "@X17║ @X07│ @X0Fthe letter @X0BR @X0Fas shown below:                                            @X07│@X17 ║@X07"
  1556.     AnsiPos 1, 16
  1557.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1558.     AnsiPos 1, 17
  1559.     PrintLn "@X17║ @X07│ @X0CMessage Security (N)=help? (@X0FR@X0C)                                          @X07│@X17 ║@X07"
  1560.     AnsiPos 1, 18
  1561.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1562.     AnsiPos 1, 19
  1563.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1564.     AnsiPos 1, 22
  1565.     PrintLn "                                                            "
  1566.     AnsiPos 1, 22
  1567.     Wait
  1568.     AnsiPos 1, 4
  1569.     PrintLn "@X0F@X70└─  @X7F 75% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EE@X0C]@X0Enter a Message                           @X17 ║@X07"
  1570.     AnsiPos 1, 5
  1571.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1572.     AnsiPos 1, 6
  1573.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1574.     AnsiPos 1, 7
  1575.     PrintLn "@X17║ @X07│ @X0FYou will then enter the message editor. This is were you type a message.@X07│@X17 ║@X07"
  1576.     AnsiPos 1, 8
  1577.     PrintLn "@X17║ @X07│ @X0FPressing the @X0BESC Key @X0Fat any time (in full screen mode) will display the @X07@X07│@X17 ║@X07"
  1578.     AnsiPos 1, 9
  1579.     PrintLn "@X17║ @X07│ @X0Ffollowing menu at the bottom of the screen.                             @X07│@X17 ║@X07"
  1580.     AnsiPos 1, 10
  1581.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1582.     AnsiPos 1, 11
  1583.     PrintLn "@X17║ @X07│ @X0A(A)bort, (C)ont Line Editor, (D)elete, (E)dit, (F)ull Scrn Editor,      @X07│@X17 ║@X07"
  1584.     AnsiPos 1, 12
  1585.     PrintLn "@X17║ @X07│ @X0A(H)elp, (I)nsert, (L)ist Msg, (Q)uote, (S)ave, (SA)Save Attach,         @X07│@X17 ║@X07"
  1586.     AnsiPos 1, 13
  1587.     PrintLn "@X17║ @X07│ @X0A(U)pload Msg, @X0EText Entry Command?                                       @X07│@X17 ║@X07"
  1588.     AnsiPos 1, 14
  1589.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1590.     AnsiPos 1, 15
  1591.     PrintLn "@X17║ @X07│ @X0FThe options are to @X0CA@X0BBORT @X0Fthe message, @X0CC@X0BONTINUE @X0Fentering your message,   @X07│@X17 ║@X07"
  1592.     AnsiPos 1, 16
  1593.     PrintLn "@X17║ @X07│ @X0CD@X0BELETE @X0Fa specified line, @X0CE@X0BDIT @X0Fa line, use the @X0CF@X0BULL @X0Fscreen editor,       @X07│@X17 ║@X07"
  1594.     AnsiPos 1, 17
  1595.     PrintLn "@X17║ @X07│ @X0Faccess @X0CH@X0BELP @X0Ffor using the editor, @X0CI@X0BNSERT @X0Fa line, @X0CL@X0BIST @X0Fthe part of the   @X07│@X17 ║@X07"
  1596.     AnsiPos 1, 18
  1597.     PrintLn "@X17║ @X07│ @X0Fmessage you have already entered, @X0B@X0CQ@X0BUOTE @X0Ffrom the message, @X0CS@X0BAVE @X0Fyour     @X07│@X17 ║@X07"
  1598.     AnsiPos 1, 19
  1599.     PrintLn "@X17║ @X07│ @X0Fmessage, @X0CSA@X0Bve @X0Fyour message and attach (upload) a file with it.          @X07│@X17 ║@X07"
  1600.     AnsiPos 1, 22
  1601.     PrintLn "                                                            "
  1602.     AnsiPos 1, 22
  1603.     Wait
  1604.     AnsiPos 1, 4
  1605.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EE@X0C]@X0Enter a Message                           @X17 ║@X07"
  1606.     AnsiPos 1, 5
  1607.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1608.     AnsiPos 1, 6
  1609.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1610.     AnsiPos 1, 7
  1611.     PrintLn "@X17║ @X07│ @X0ENOTE: @X0FYou @X0CMUST SAVE @X0Fyour message before exiting the message editor or   @X07│@X17 ║@X07"
  1612.     AnsiPos 1, 8
  1613.     PrintLn "@X17║ @X07│ @X0Fit will never be sent. Remember to press the @X0BESC key @X0Fto display the     @X07@X07│@X17 ║@X07"
  1614.     AnsiPos 1, 9
  1615.     PrintLn "@X17║ @X07│ @X0Fmessage editor's options and finally...                                 @X07│@X17 ║@X07"
  1616.     AnsiPos 1, 10
  1617.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1618.     AnsiPos 1, 11
  1619.     PrintLn "@X17║ @X07│ @X0FThe @X0BFull-Screen @X0Feditor is more like a word processor, were you have     @X07│@X17 ║@X07"
  1620.     AnsiPos 1, 12
  1621.     PrintLn "@X17║ @X07│ @X0Fcursor control and you can move about the screen as you wish.           @X07│@X17 ║@X07"
  1622.     AnsiPos 1, 13
  1623.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1624.     AnsiPos 1, 14
  1625.     PrintLn "@X17║ @X07│ @X0FThe @X0BLine editor @X0Flet you edit and enter messages a line at a time.       @X07│@X17 ║@X07"
  1626.     AnsiPos 1, 15
  1627.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1628.     AnsiPos 1, 16
  1629.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1630.     AnsiPos 1, 17
  1631.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1632.     AnsiPos 1, 18
  1633.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1634.     AnsiPos 1, 19
  1635.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1636.     AnsiPos 1, 22
  1637.     PrintLn "                                                            "
  1638.     AnsiPos 1, 22
  1639.     Wait
  1640.     Goto LABEL001
  1641.     :LABEL041
  1642.     Gosub LABEL047
  1643.     AnsiPos 1, 4
  1644.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EK@X0C]@X0Eill a message                            @X17 ║@X07"
  1645.     AnsiPos 1, 5
  1646.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1647.     AnsiPos 1, 6
  1648.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1649.     AnsiPos 1, 7
  1650.     PrintLn "@X17║ @X07│ @X0FAllows you delete a message so that others can no longer read it.       @X07│@X17 ║@X07"
  1651.     AnsiPos 1, 8
  1652.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1653.     AnsiPos 1, 9
  1654.     PrintLn "@X17║ @X07│ @X0DSubCommands:                                                            @X07│@X17 ║@X07"
  1655.     AnsiPos 1, 10
  1656.     PrintLn "@X17║ @X07│ @X0AK;(#)   @X0CKill @X0Fa vaild message @X0C# @X0F(number).                                @X07│@X17 ║@X07"
  1657.     AnsiPos 1, 22
  1658.     PrintLn "                                                            "
  1659.     AnsiPos 1, 22
  1660.     Wait
  1661.     Goto LABEL003
  1662.     :LABEL042
  1663.     AnsiPos 1, 4
  1664.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EQ@X0C]@X0Euick Message Scan                        @X17 ║@X07"
  1665.     AnsiPos 1, 5
  1666.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1667.     AnsiPos 1, 6
  1668.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1669.     AnsiPos 1, 7
  1670.     PrintLn "@X17║ @X07│ @X0FThe @X0EQuick message scan @X0Fcommand lets you view a quick description of     @X07│@X17 ║@X07"
  1671.     AnsiPos 1, 8
  1672.     PrintLn "@X17║ @X07│ @X0Fthe message headers.                                                    @X07│@X17 ║@X07"
  1673.     AnsiPos 1, 9
  1674.     PrintLn "@X17║ @X07│ @X0BThe header includes information such as:                                @X07│@X17 ║@X07"
  1675.     AnsiPos 1, 10
  1676.     PrintLn "@X17║ @X07│ @X0FThe message number, the message reference number (if any), who the      @X07│@X17 ║@X07"
  1677.     AnsiPos 1, 11
  1678.     PrintLn "@X17║ @X07│ @X0Fmessage is to, who the message is from, and the subject matter of the   @X07│@X17 ║@X07"
  1679.     AnsiPos 1, 12
  1680.     PrintLn "@X17║ @X07│ @X0Fmessage.                                                                @X07│@X17 ║@X07"
  1681.     AnsiPos 1, 13
  1682.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1683.     AnsiPos 1, 14
  1684.     PrintLn "@X17║ @X07│ @X0DSubCommands:                                                            @X07│@X17 ║@X07"
  1685.     AnsiPos 1, 15
  1686.     PrintLn "@X17║ @X07│ @X0AQ;(#)    @X0FAny valid message header.                                      @X07│@X17 ║@X07"
  1687.     AnsiPos 1, 16
  1688.     PrintLn "@X17║ @X07│ @X0AQ;F      @X0CQ@X0Fuick scans any message headers @X0CF@X0From you.                      @X07│@X17 ║@X07"
  1689.     AnsiPos 1, 17
  1690.     PrintLn "@X17║ @X07│ @X0AQ;Y      @X0CQ@X0Fuick scans any message headers to @X0CY@X0Fou.                        @X07│@X17 ║@X07"
  1691.     AnsiPos 1, 18
  1692.     PrintLn "@X17║ @X07│ @X0AQ;S      @X0CQ@X0Fuick @X0CS@X0Fcans for headers above beyond those that you have       @X07│@X17 ║@X07"
  1693.     AnsiPos 1, 19
  1694.     PrintLn "@X17║ @X07│          @X0Falready read.                                                  @X07│@X17 ║@X07"
  1695.     AnsiPos 1, 20
  1696.     PrintLn "@X17║ @X07└─────────────────────────────────────────────────────────────────────────┘@X17 ║@X07"
  1697.     AnsiPos 1, 21
  1698.     PrintLn "@X17╚═════════════════════════════════════════════════════════════════════════════╝@X07"
  1699.     AnsiPos 1, 22
  1700.     PrintLn "                                                            "
  1701.     AnsiPos 1, 22
  1702.     Wait
  1703.     Goto LABEL003
  1704.     :LABEL043
  1705.     Gosub LABEL047
  1706.     AnsiPos 1, 4
  1707.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EW@X0C]@X0Erite User Information                    @X17 ║@X07"
  1708.     AnsiPos 1, 5
  1709.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1710.     AnsiPos 1, 6
  1711.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1712.     AnsiPos 1, 7
  1713.     PrintLn "@X17║ @X07│ @X0FThis command allows you to edit or view your account information.       @X07│@X17 ║@X07"
  1714.     AnsiPos 1, 8
  1715.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1716.     AnsiPos 1, 9
  1717.     PrintLn "@X17║ @X07│ @X0FInformation such as your address, phone number etc...                   @X07│@X17 ║@X07"
  1718.     AnsiPos 1, 10
  1719.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1720.     AnsiPos 1, 11
  1721.     PrintLn "@X17║ @X07│ @X0FIf any of this information has changes, please use this command to      @X07│@X17 ║@X07"
  1722.     AnsiPos 1, 12
  1723.     PrintLn "@X17║ @X07│ @X0Fupdate it.                                                              @X07│@X17 ║@X07"
  1724.     AnsiPos 1, 22
  1725.     PrintLn "                                                            "
  1726.     AnsiPos 1, 22
  1727.     Wait
  1728.     Goto LABEL005
  1729.     :LABEL044
  1730.     Gosub LABEL047
  1731.     AnsiPos 1, 4
  1732.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0ET@X0C]@X0Eransfer Protocol                         @X17 ║@X07"
  1733.     AnsiPos 1, 5
  1734.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1735.     AnsiPos 1, 6
  1736.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1737.     AnsiPos 1, 7
  1738.     PrintLn "@X17║ @X07│ @X0FDisplays a list of the various transfer protocols available for the     @X07│@X17 ║@X07"
  1739.     AnsiPos 1, 8
  1740.     PrintLn "@X17║ @X07│ @X0Fuploading and downloading of files.                                     @X07@X07│@X17 ║@X07"
  1741.     AnsiPos 1, 9
  1742.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1743.     AnsiPos 1, 10
  1744.     PrintLn "@X17║ @X07│ @X0CQuick Note:                                                             @X07│@X17 ║@X07"
  1745.     AnsiPos 1, 11
  1746.     PrintLn "@X17║ @X07│ @X0FMost SysOps highly recommended using @X0BZMODEM @X0Fas your transfer protocol.  @X07│@X17 ║@X07"
  1747.     AnsiPos 1, 12
  1748.     PrintLn "@X17║ @X07│ @X0FMake sure your communications program uses the protocol you choose.     @X07│@X17 ║@X07"
  1749.     AnsiPos 1, 13
  1750.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1751.     AnsiPos 1, 22
  1752.     PrintLn "                                                            "
  1753.     AnsiPos 1, 22
  1754.     Wait
  1755.     Goto LABEL005
  1756.     :LABEL045
  1757.     Gosub LABEL047
  1758.     AnsiPos 1, 4
  1759.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EP@X0C]@X0Eage Length                               @X17 ║@X07"
  1760.     AnsiPos 1, 5
  1761.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1762.     AnsiPos 1, 6
  1763.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1764.     AnsiPos 1, 7
  1765.     PrintLn "@X17║ @X07│ @X0FSpecifies the number of lines displayed on your screen.                 @X07│@X17 ║@X07"
  1766.     AnsiPos 1, 8
  1767.     PrintLn "@X17║ @X07│                                                                         @X07@X07│@X17 ║@X07"
  1768.     AnsiPos 1, 9
  1769.     PrintLn "@X17║ @X07│ @X0FIt is recommended to set this value at 23 or 24.                        @X07│@X17 ║@X07"
  1770.     AnsiPos 1, 22
  1771.     PrintLn "                                                            "
  1772.     AnsiPos 1, 22
  1773.     Wait
  1774.     Goto LABEL003
  1775.     :LABEL046
  1776.     Gosub LABEL047
  1777.     AnsiPos 1, 4
  1778.     PrintLn "@X0F@X70└─  @X7F100% Viewed  @X70─┘@X07  @X17║ @X0A Command: @X0C[@X0EN@X0C]@X0Eew File scan                             @X17 ║@X07"
  1779.     AnsiPos 1, 5
  1780.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1781.     AnsiPos 1, 6
  1782.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1783.     AnsiPos 1, 7
  1784.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1785.     AnsiPos 1, 8
  1786.     PrintLn "@X17║ @X07│                                                                         @X07@X07│@X17 ║@X07"
  1787.     AnsiPos 1, 9
  1788.     PrintLn "@X17║ @X07│ @X0FDisplays file listings based on a date scan of when the file was placed @X07│@X17 ║@X07"
  1789.     AnsiPos 1, 10
  1790.     PrintLn "@X17║ @X07│ @X0Fon the system.                                                          @X07│@X17 ║@X07"
  1791.     AnsiPos 1, 11
  1792.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1793.     AnsiPos 1, 12
  1794.     PrintLn "@X17║ @X07│ @X0DSubCommands:                                                            @X07│@X17 ║@X07"
  1795.     AnsiPos 1, 13
  1796.     PrintLn "@X17║ @X07│ @X0AN;(date)   @X0FNew since (date - in mmddyy format)                          @X07│@X17 ║@X07"
  1797.     AnsiPos 1, 14
  1798.     PrintLn "@X17║ @X07│ @X0AN;A        @X0FSearch for @X0CN@X0Few files in @X0CA@X0Fll the directories                  @X07│@X17 ║@X07"
  1799.     AnsiPos 1, 15
  1800.     PrintLn "@X17║ @X07│ @X0AN;S        @X0FSearch for @X0CN@X0Few files @X0CS@X0Fince the last time you were logged on. @X07│@X17 ║@X07"
  1801.     AnsiPos 1, 22
  1802.     PrintLn "                                                            "
  1803.     AnsiPos 1, 22
  1804.     Wait
  1805.     Goto LABEL003
  1806.     :LABEL047
  1807.     AnsiPos 1, 4
  1808.     PrintLn "@X0F@X70└─               @X70─┘@X07  @X17║ @X0A Searching please wait...                             @X17 ║@X07"
  1809.     AnsiPos 1, 5
  1810.     PrintLn "@X17╔════════════════════╩════════════════════════════════════════════════════════╣@X07"
  1811.     AnsiPos 1, 6
  1812.     PrintLn "@X17║ @X07┌─────────────────────────────────────────────────────────────────────────┐@X17 ║@X07"
  1813.     AnsiPos 1, 7
  1814.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1815.     AnsiPos 1, 8
  1816.     PrintLn "@X17║ @X07│                                                                         @X07@X07│@X17 ║@X07"
  1817.     AnsiPos 1, 9
  1818.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1819.     AnsiPos 1, 10
  1820.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1821.     AnsiPos 1, 11
  1822.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1823.     AnsiPos 1, 12
  1824.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1825.     AnsiPos 1, 13
  1826.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1827.     AnsiPos 1, 14
  1828.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1829.     AnsiPos 1, 15
  1830.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1831.     AnsiPos 1, 16
  1832.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1833.     AnsiPos 1, 17
  1834.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1835.     AnsiPos 1, 18
  1836.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1837.     AnsiPos 1, 19
  1838.     PrintLn "@X17║ @X07│                                                                         @X07│@X17 ║@X07"
  1839.     AnsiPos 1, 20
  1840.     PrintLn "@X17║ @X07└─────────────────────────────────────────────────────────────────────────┘@X17 ║@X07"
  1841.     AnsiPos 1, 21
  1842.     PrintLn "@X17╚═════════════════════════════════════════════════════════════════════════════╝@X07"
  1843.     AnsiPos 1, 22
  1844.     PrintLn "                                                            "
  1845.     AnsiPos 1, 22
  1846.     Return
  1847.     :LABEL048
  1848.     AnsiPos 26, 17
  1849.     PrintLn "@X0B@X4F  Please @XCEmake your selection @X4Ffrom the catagories  @X07"
  1850.     AnsiPos 26, 18
  1851.     PrintLn "@X0B@X4F               ABOVE or on the LEFT.              @X07"
  1852.     Delay 100
  1853.     Return
  1854.     :LABEL049
  1855.  
  1856. ;------------------------------------------------------------------------------
  1857. ;
  1858. ; Usage report (before postprocessing)
  1859. ;
  1860. ; ■ Statements used :
  1861. ;
  1862. ;    5       End
  1863. ;    47      Wait
  1864. ;    256     Goto 
  1865. ;    18      Let 
  1866. ;    612     PrintLn 
  1867. ;    84      If 
  1868. ;    9       DispFile 
  1869. ;    1       FOpen 
  1870. ;    15      FGet 
  1871. ;    29      Gosub 
  1872. ;    2       Return
  1873. ;    1       Delay 
  1874. ;    656     AnsiPos 
  1875. ;    1       FCloseAll
  1876. ;    5       EndFunc
  1877. ;
  1878. ;
  1879. ; ■ Functions used :
  1880. ;
  1881. ;    1       /
  1882. ;    21      +
  1883. ;    84      ==
  1884. ;    5       <>
  1885. ;    74      !
  1886. ;    5       ||
  1887. ;    1       Len(
  1888. ;    72      Upper()
  1889. ;    2       Mid()
  1890. ;    1       Right()
  1891. ;    5       Chr()
  1892. ;    3       Asc()
  1893. ;    5       Inkey()
  1894. ;    3       String()
  1895. ;    1       PCBDat()
  1896. ;    10      PPEPath()
  1897. ;    1       ReadLine()
  1898. ;
  1899. ;------------------------------------------------------------------------------
  1900. ;
  1901. ; Analysis flags : d
  1902. ;
  1903. ; d - Access PCBOARD.DAT ■ 2
  1904. ;     Program gets the full pathname to PCBOARD.DAT, this may be usefull
  1905. ;     for many PPE so they can find various informations on the system
  1906. ;     (system paths, max number of lines in messages, ...) but it may also
  1907. ;     be a way to gather vital informations.
  1908. ;     ■ Search for : PCBDAT()
  1909. ;
  1910. ;------------------------------------------------------------------------------
  1911. ;
  1912. ; Postprocessing report
  1913. ;
  1914. ;    0       For/Next
  1915. ;    10      While/EndWhile
  1916. ;    62      If/Then or If/Then/Else
  1917. ;    1       Select Case
  1918. ;
  1919. ;------------------------------------------------------------------------------
  1920. ;                 AEGiS Corp - Break the routines, code against the machines!
  1921. ;------------------------------------------------------------------------------
  1922.